diff options
author | cyeh%bluemartini.com <> | 2000-08-22 02:50:41 +0000 |
---|---|---|
committer | cyeh%bluemartini.com <> | 2000-08-22 02:50:41 +0000 |
commit | e8b93c7c68c4b56cdc10249ba3740a504f30e2ee (patch) | |
tree | 255dc20e2b66d93674fb7839e75049709b6e88d4 /CGI.pl | |
parent | 2cd9592d7760d10b8840e155380b5dc4d2b62ff0 (diff) | |
download | bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.gz bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.bz2 bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.tar.xz bugs-e8b93c7c68c4b56cdc10249ba3740a504f30e2ee.zip |
fix for bug #44622: perl5.6 vs perl5.005 -w: more anal 5.6 causes errors.
patches by mtakacs@pacbell.net.
Diffstat (limited to 'CGI.pl')
-rw-r--r-- | CGI.pl | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -118,7 +118,7 @@ sub ParseUrlString { $isnull{$name} = 1; } } - if (defined %isnull) { + if (%isnull) { foreach my $name (keys(%isnull)) { if (!defined $f->{$name}) { $f->{$name} = ""; |