diff options
| author | steve <steve> | 2005-04-19 18:57:17 +0000 |
|---|---|---|
| committer | steve <steve> | 2005-04-19 18:57:17 +0000 |
| commit | 9fc1eb53151fdec1e7429fc676f69631bef76a1b (patch) | |
| tree | 89651912eb77f9f6155cf5e29668cd5c6b65eac7 /util/mkdef.pl | |
| parent | 2dba8c413745e51d0629446cb859bc960a6706c8 (diff) | |
| download | openssl-9fc1eb53151fdec1e7429fc676f69631bef76a1b.tar.gz | |
Stop perl warning.
Diffstat (limited to 'util/mkdef.pl')
| -rwxr-xr-x | util/mkdef.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index e6064baf6..6cbdf7768 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -432,7 +432,11 @@ sub do_defs 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 = ''; |