commit | fca505cc7a763e0b3ed22c5038a5d5fed5ada0b8 | [log] [tgz] |
---|---|---|
author | Lev Walkin <vlm@lionet.info> | Fri Mar 04 09:15:40 2005 +0000 |
committer | Lev Walkin <vlm@lionet.info> | Fri Mar 04 09:15:40 2005 +0000 |
tree | c1b9b154d2ecaa0814645a14a29089b2df76d96d | |
parent | a02a0c0d4a0628f10776504ec0ccd58e7ef82144 [diff] |
new perl requires braces
diff --git a/asn1c/webcgi/asn1c.cgi b/asn1c/webcgi/asn1c.cgi index 6587ddb..930b9c9 100755 --- a/asn1c/webcgi/asn1c.cgi +++ b/asn1c/webcgi/asn1c.cgi
@@ -510,7 +510,7 @@ . "Fetch results (.tgz)</A></NOBR>" if $allowFetchResults; if($ec ne "0") { - local $eml, @resp; + local ($eml, @resp); open(H, '< ' . $sessionDir . '/' . $trans . '/+HelpResp') and @resp = <H>; open(H, '< ' . $sessionDir . '/' . $trans . '/+HelpReq')