diff options
| author | terry%mozilla.org <> | 1999-10-19 06:02:59 +0000 |
|---|---|---|
| committer | terry%mozilla.org <> | 1999-10-19 06:02:59 +0000 |
| commit | 91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b (patch) | |
| tree | 41cb5d4d24371337b2945c574613587add500135 /post_bug.cgi | |
| parent | 88e4e7eaae0c4d7177bc30c6f992e84396b0a4ed (diff) | |
| download | bugs-91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b.tar bugs-91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b.tar.gz bugs-91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b.tar.bz2 bugs-91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b.tar.xz bugs-91d8db0df1b0e1465a1f1c13c1e9adb5cf3d9c7b.zip | |
Fixed stupid perl warning.
Diffstat (limited to 'post_bug.cgi')
| -rwxr-xr-x | post_bug.cgi | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/post_bug.cgi b/post_bug.cgi index d31a73774..c85c75eba 100755 --- a/post_bug.cgi +++ b/post_bug.cgi @@ -28,10 +28,11 @@ require "CGI.pl"; # Shut up misguided -w warnings about "used only once". For some reason, # "use vars" chokes on me when I try it here. -# use vars qw($::buffer); -my $zz = $::buffer; -$zz = $zz . $zz; - +sub sillyness { + my $zz; + $zz = $::buffer; + $zz = %::COOKIE; +} confirm_login(); print "Set-Cookie: PLATFORM=$::FORM{'product'} ; path=/ ; expires=Sun, 30-Jun-2029 00:00:00 GMT\n"; |