Bug 67950c - make quips.cgi compile without warnings, by use vars-ing $userid. Patch by gerv.

689a307b · gerv%gerv.net · 0e3c836c · 689a307b
Commit 689a307b authored Jul 25, 2002 by gerv%gerv.net
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

quips.cgi quips.cgi +2 -1

No files found.
--- a/quips.cgi
+++ b/quips.cgi
@@ -27,6 +27,7 @@ use strict;

 use vars qw(
  %FORM
+  $userid
  $template
  $vars
 );
@@ -68,7 +69,7 @@ if ($action eq "add") {
        exit();
    }

-    SendSQL("INSERT INTO quips (userid, quip) VALUES (". $::userid . ", " . SqlQuote($comment) . ")");
+    SendSQL("INSERT INTO quips (userid, quip) VALUES (". $userid . ", " . SqlQuote($comment) . ")");

    $vars->{'added_quip'} = $comment;
 }