CVS: blootbot/src/Factoids Question.pl,1.46,1.47

[Tim R. <tim...@us...>]

Update of /cvsroot/blootbot/blootbot/src/Factoids
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8336/src/Factoids

Modified Files:
	Question.pl 
Log Message:
pipes in nicks

Index: Question.pl
===================================================================
RCS file: /cvsroot/blootbot/blootbot/src/Factoids/Question.pl,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -r1.46 -r1.47
--- Question.pl	19 May 2005 06:14:54 -0000	1.46
+++ Question.pl	31 May 2005 05:50:24 -0000	1.47
@@ -252,9 +252,14 @@
 	# end of update stats.
 
 	$result	= $r;
+
 	$result	=~ s/^\((.*?)\): //;
+	my $vars = $1;
+
+	# start nasty hack to get partial &getReply() functionality.
+	$result = &SARit($result);
 
-	foreach ( split(',', $1) ) {
+	foreach ( split(',', $vars) ) {
 	    my $val = $vals[$i];
 #	    &DEBUG("val => $val");
 
@@ -285,8 +290,7 @@
 	    $i++;
 	}
 
-	# nasty hack to get partial &getReply() functionality.
-	$result = &SARit($result);
+	# rest of nasty hack to get partial &getReply() functionality.
 	$result =~ s/^\s*<action>\s*(.*)/\cAACTION $1\cA/i;
 	$result =~ s/^\s*<reply>\s*//i;