From 0b5c527fcdfd48e04db69010221a695c099a4764 Mon Sep 17 00:00:00 2001
From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Mon, 12 Jul 2004 22:07:13 +0000
Subject: [PATCH] trivial lart WHO for WHAT support

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@999 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/CommandStubs.pl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/CommandStubs.pl b/src/CommandStubs.pl
index b5238f4..ab504e3 100644
--- a/src/CommandStubs.pl
+++ b/src/CommandStubs.pl
@@ -668,6 +668,10 @@ sub lart {
 	    return;
 	}
     }
+    if ($target =~ /^(.*)(\s+for\s+.*)$/) {
+	$target	= $1;
+	$for	= $2;
+    }
 
     my $line = &getRandomLineFromFile($bot_data_dir. "/blootbot.lart");
     if (defined $line) {
@@ -676,6 +680,7 @@ sub lart {
 	} else {
 	    $line =~ s/WHO/$target/g;
 	}
+	$line .= $for if ($for);
 	$line .= ", courtesy of $who" if ($extra);
 
 	&action($chan, $line);
-- 
2.39.2