From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sun, 10 Dec 2000 12:54:23 +0000 (+0000)
Subject: userHandle now global var
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a067519114ca70e94e0f6a16b66e45449d8ede4d;p=infobot.git

userHandle now global var


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

diff --git a/blootbot/src/IRC/IrcHooks.pl b/blootbot/src/IRC/IrcHooks.pl
index 7f0b811..02f3bde 100644
--- a/blootbot/src/IRC/IrcHooks.pl
+++ b/blootbot/src/IRC/IrcHooks.pl
@@ -59,7 +59,7 @@ sub on_chat {
     }
 
     if (!exists $dcc{'CHAT'}{$nick}) {
-	my $userHandle	= &verifyUser($who, $nuh);
+	$userHandle	= &verifyUser($who, $nuh);
 	my $crypto	= $userList{$userHandle}{'pass'};
 	my $success	= 0;
 
@@ -91,7 +91,6 @@ sub on_chat {
 	return;
     }
 
-
     $userHandle = &verifyUser($who, $nuh);
     &status("$b_red=$b_cyan$who$b_red=$ob $message");
     if ($message =~ s/^\.//) {	# dcc chat commands.
@@ -184,11 +183,11 @@ sub on_dcc_close {
 
     &DEBUG("dcc_close: nick => '$nick'.");
 
-    if (exists $dcc{'SEND'}{$nick} and -f "temp/$nick.txt") {
+    if (exists $dcc{'SEND'}{$nick} and -f "$param{tempDir}/$nick.txt") {
 	&status("${b_green}DCC SEND$ob close from $b_cyan$nick$ob");
 
 	&status("dcc_close: purging $nick.txt from Debian.pl");
-	unlink "temp/$nick.txt";
+	unlink "$param{tempDir}/$nick.txt";
 
 	delete $dcc{'SEND'}{$nick};
     } elsif (exists $dcc{'CHAT'}{$nick} and $dcc{'CHAT'}{$nick} eq $sock) {
@@ -210,7 +209,7 @@ sub on_dcc_open {
 	&status("${b_green}DCC lGET$ob established with $b_cyan$nick$ob");
     } elsif ($type eq 'CHAT') {
 	&status("${b_green}DCC CHAT$ob established with $b_cyan$nick$ob ($nuh{$nick})");
-	my $userHandle  = &verifyUser($nick, $nuh{lc $nick});
+	$userHandle     = &verifyUser($nick, $nuh{lc $nick});
 	my $crypto	= $userList{$userHandle}{'pass'};
 	if (defined $crypto) {
 	    $self->privmsg($sock,"Enter Password, $userHandle.");