1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 16:45:40 -04:00

more work on 8ball

This commit is contained in:
Ryan Voots 2010-10-05 00:13:31 -04:00
parent e166ae6bd8
commit 00839b59b6

View file

@ -17,7 +17,7 @@ sub {
@a = split(/(?:\bor\b|\s*,\s*)/, $said->{body});
}
s/^\s*//, s/\s*$// for @a; #trim them up
s/^\s*//, s/\s*\?\s*$// for @a; #trim them up
}
else
{