From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Fri, 9 Feb 2001 13:10:32 +0000 (+0000)
Subject: substitute the right vars in getReply when used in tell. found by asuffield
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;ds=sidebyside;h=542bdfabcdad382e6b72de5a7f416432d9736da8;p=infobot.git

substitute the right vars in getReply when used in tell. found by asuffield


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

diff --git a/src/UserExtra.pl b/src/UserExtra.pl
index 9a5fa42..dd5a9e7 100644
--- a/src/UserExtra.pl
+++ b/src/UserExtra.pl
@@ -319,14 +319,15 @@ sub tell {
 	return;
     }
 
-    # ...
+    my $oldwho		= $who;
+    my $oldmtype	= $msgType;
+    $who		= $target;
     my $result = &doQuestion($tell_obj);
-    # ^ returns '0' if nothing was found.
+	# ^ returns '0' if nothing was found.
+    $who		= $oldwho;
 
     # no such factoid.
     if ($result =~ /^0?$/) {
-	my $oldwho	= $who;
-	my $oldmtype	= $msgType;
 	$who		= $target;
 	$msgType	= "private";