Commit 91d8db0d authored by terry%mozilla.org's avatar terry%mozilla.org

Fixed stupid perl warning.

parent 88e4e7ea
......@@ -25,8 +25,14 @@ use strict;
require "CGI.pl";
# Shut up misguided -w warnings about "used only once":
use vars %::FORM;
# Shut up misguided -w warnings about "used only once". "use vars" just
# doesn't work for me.
sub sillyness {
my $zz;
$zz = $::usergroupset;
$zz = %::FORM;
}
print "Content-type: text/html\n\n";
PutHeader ("Full Text Bug Listing");
......
......@@ -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";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment