Fixed stupid perl warning.

diff --git a/CGI.pl b/CGI.pl
index 76adcc702a37495fe79a83b1b490a2f1d95d9e4e..30d621c7359c63caacb9b8afdb245d53c34e6dd3 100644 (file)
--- a/CGI.pl
+++ b/CGI.pl
@@ -26,7 +26,7 @@ use strict;
 # Shut up misguided -w warnings about "used only once".  For some reason,
 # "use vars" chokes on me when I try it here.
 
-sub sillyness {
+sub CGI_pl_sillyness {
     my $zz;
     $zz = %::FILENAME;
 }