From 817dcdd764840e5dff9cdd08ebf6a8ac0f01b74f Mon Sep 17 00:00:00 2001
From: Ryan Voots <simcop2387@simcop2387.info>
Date: Fri, 18 Mar 2011 02:57:33 -0400
Subject: [PATCH] testing modified 8ball

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

diff --git a/plugins/8ball.pm b/plugins/8ball.pm
index 677a5a5..3dfeaba 100644
--- a/plugins/8ball.pm
+++ b/plugins/8ball.pm
@@ -22,7 +22,7 @@ use List::Util qw(min);
 
 my $a=sub {
 	my( $said ) = @_;
-    $said->{body} =~ s/^[^,]*://;
+    #$said->{body} =~ s/^[^,]*://;
     
     my $ors =()= $said->{body}=~m/\bor\b/g;
     my $common = "";