1 files changed, 8 insertions, 2 deletions
diff --git a/long_list.cgi b/long_list.cgi
index e855c4434..0641dd229 100755
--- a/long_list.cgi
+++ b/long_list.cgi
@@ -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");