| commit | 40e950aed64808201993ed1e80df1b8b83ef5305 | [log] [tgz] |
|---|---|---|
| author | Dr. Stephen Henson <steve@openssl.org> | Tue Apr 19 18:57:17 2005 +0000 |
| committer | Dr. Stephen Henson <steve@openssl.org> | Tue Apr 19 18:57:17 2005 +0000 |
| tree | 48e4576208e0425e3dd1faf064548e84988c6b53 | |
| parent | 987bebaf8c2232ef1d0a9169eb56570e3a0753b8 [diff] [blame] |
Stop perl warning.
diff --git a/util/mkdef.pl b/util/mkdef.pl index e6064ba..6cbdf77 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl
@@ -432,7 +432,11 @@ print STDERR "DEBUG: parsing ----------\n" if $debug; while(<IN>) { - last if (/\/\* Error codes for the \w+ functions\. \*\//); + if (/\/\* Error codes for the \w+ functions\. \*\//) + { + undef @tag; + last; + } if ($line ne '') { $_ = $line . $_; $line = '';