From 9eeb9ec9503dc060defa1f86636bfd8c5ca83255 Mon Sep 17 00:00:00 2001
From: Ryan Voots <simcop2387@simcop2387.info>
Date: Tue, 5 Oct 2010 00:32:53 -0400
Subject: [PATCH] more space trimming

---
 plugins/8ball.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/plugins/8ball.pm b/plugins/8ball.pm
index f3b7762..fe7d4da 100644
--- a/plugins/8ball.pm
+++ b/plugins/8ball.pm
@@ -40,7 +40,7 @@ sub {
 			@a = split(/(?:\bor\b|\s*,\s*)/, $said->{body});
 		}
 	    
-		s/^\s*//, s/\s*\?\s*$// for @a; #trim them up
+		s/^\s*//, s/\s*(\?\s*)?$// for @a; #trim them up
 		
 		$common = $findcommon->(@a);
 		s/^$common// for @a; # remove the common stuff for grammar