X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FIRC%2FIrcHooks.pl;h=889734b4f81b135259fdcacf758232b14429ca3f;hb=7ea50ad1d0e8dc5e851aa1c5db489de01e719d24;hp=8fc4c0778b9a822a7ea9203124f5a8b1c3f9ec62;hpb=f0a00b56d1497c3b3f0d33e0d57e5d31a0161a55;p=infobot.git

diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl
index 8fc4c07..889734b 100644
--- a/src/IRC/IrcHooks.pl
+++ b/src/IRC/IrcHooks.pl
@@ -96,7 +96,7 @@ sub on_chat {
     if ($message =~ s/^\.//) {	# dcc chat commands.
 	### TODO: make use of &Forker(); here?
 	&loadMyModule($myModules{'ircdcc'});
-	return 'NOREPLY from userD' if (&userDCC() eq 'NOREPLY');
+	return '$noreply from userD' if (&userDCC() eq $noreply);
 	$conn->privmsg($dcc{'CHAT'}{$who}, "Invalid command.");
 
     } else {			# dcc chat arena.
@@ -112,7 +112,7 @@ sub on_endofmotd {
     my ($self) = @_;
 
     if (&IsParam("wingate")) {
-	my $file = "$infobot_base_dir/$param{'ircUser'}.wingate";
+	my $file = "$bot_base_dir/$param{'ircUser'}.wingate";
 	open(IN, $file);
 	while (<IN>) {
 	    chop;
@@ -692,7 +692,7 @@ sub on_version {
     my $nick = $event->nick;
 
     &status(">>> ${b_green}CTCP VERSION$ob request from $b_cyan$nick$ob");
-    $self->ctcp_reply($nick, "VERSION $infobot_version");
+    $self->ctcp_reply($nick, "VERSION $bot_version");
 }
 
 sub on_who {