Commit 26303bd8 authored by Lev Walkin's avatar Lev Walkin
parent 034ee194
...@@ -42,8 +42,8 @@ while(<>) { ...@@ -42,8 +42,8 @@ while(<>) {
$modName = $1; $modName = $1;
$currentFname = $rfcid . $modName . ".asn1"; $currentFname = $rfcid . $modName . ".asn1";
$inasn = 1; $inasn = 1;
} elsif(/^[ \t]*([A-Z][A-Za-z0-9-]*).*{[ \t]*iso/ } elsif(/^[ \t]*([A-Z][A-Za-z0-9-]*).*{[ \t]*(?:joint-)?iso/
|| /^[ \t]*{[ \t]*iso/) { || /^[ \t]*{[ \t]*(?:joint-)?iso/) {
my @a = ($_); my @a = ($_);
$modName = $1; $modName = $1;
unless(length($modName)) { unless(length($modName)) {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment