From 40047ec70e0d61b5e0bf17a3f430ea0339b8fa97 Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Fri, 11 Aug 2000 13:10:01 +0000
Subject: [PATCH] closed 17344 -- Maths.pl is borked in a way

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

diff --git a/src/Modules/Math.pl b/src/Modules/Math.pl
index b7ba156..d8d4898 100644
--- a/src/Modules/Math.pl
+++ b/src/Modules/Math.pl
@@ -101,8 +101,9 @@ sub perlMath {
     if (($locMsg =~ /^\s*[-\d*+\s()\/^\.\|\&\*\!]+\s*$/)
 	&& ($locMsg !~ /^\s*\(?\d+\.?\d*\)?\s*$/)
 	&& ($locMsg !~ /^\s*$/)
-	&& ($locMsg !~ /^\s*[( )]+\s*$/))
-    {
+	&& ($locMsg !~ /^\s*[( )]+\s*$/)
+	&& ($locMsg =~ /\d+/)
+    ) {
 	$locMsg = eval($locMsg);
 
 	if (defined $locMsg and $locMsg =~ /^[-+\de\.]+$/) {
-- 
2.39.5