make $nickserv global and set to zero in Irc.pl

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@286 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl
index 0e0049dfc991a4cd2bca91361426dbf899da929d..7deecb572e5d099441caf94a95664cc38bf01cde 100644 (file)
--- a/src/IRC/Irc.pl
+++ b/src/IRC/Irc.pl
@@ -7,6 +7,9 @@
 
 if (&IsParam("useStrict")) { use strict; }
 
+use vars qw($nickserv);
+$nickserv      = 0;
+
 # static scalar variables.
 $mask{ip}      = '(\d+)\.(\d+)\.(\d+)\.(\d+)';
 $mask{host}    = '[\d\w\_\-\/]+\.[\.\d\w\_\-\/]+';

diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl
index f716b6f9ff7e71bdc73310837bf3297a35016b7c..4829801cb31f9205ace55d0fe227edc5262a6c94 100644 (file)
--- a/src/IRC/IrcHooks.pl
+++ b/src/IRC/IrcHooks.pl
@@ -7,8 +7,6 @@
 
 if (&IsParam("useStrict")) { use strict; }
 
-my $nickserv   = 0;
-
 # GENERIC. TO COPY.
 sub on_generic {
     my ($self, $event) = @_;