From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 3 Jan 2006 09:29:56 +0000 (+0000)
Subject: one word of alpha
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=fd3203e751b3fb3495cfe4137a03ee13026794b7;hp=09fc06294f69c375cbead79a59907b833c115891;p=infobot.git

one word of alpha


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1244 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/Modules/spell.pl b/blootbot/src/Modules/spell.pl
index dda751f..f6ff889 100644
--- a/blootbot/src/Modules/spell.pl
+++ b/blootbot/src/Modules/spell.pl
@@ -14,6 +14,10 @@ use strict;
 
 sub spell::spell {
 	my $query = shift;
+	if ($query =~ m/[^[:alpha:]]/) {
+		return("only one word of alphabetic characters supported");
+	}
+
 	my $binary;
 	my @binaries = (
 		'/usr/bin/aspell',