- forgot to delete hash key even if current pid == parent pid.

[infobot.git] / blootbot / src / Modules / Math.pl

diff --git a/blootbot/src/Modules/Math.pl b/blootbot/src/Modules/Math.pl
index bf1b41a3c53a52dddf19525e1cb4515b36217a26..caecf9f70fd594117c61482ac358b2067a58d893 100644 (file)
--- a/blootbot/src/Modules/Math.pl
+++ b/blootbot/src/Modules/Math.pl
@@ -104,6 +104,7 @@ sub perlMath {
        && ($locMsg !~ /^\s*[( )]+\s*$/)
        && ($locMsg =~ /\d+/)
     ) {
+       $locMsg =~ s/([0-9]+\.[0-9]+(\.[0-9]+)+)/"$1"/g;
        $locMsg = eval($locMsg);
 
        if (defined $locMsg and $locMsg =~ /^[-+\de\.]+$/) {
@@ -125,9 +126,11 @@ sub perlMath {
        $locMsg = "";
     }
 
-    if (defined $logMsg and $locMsg ne $message) {
+    if (defined $locMsg and $locMsg ne $message) {
+       # success.
        return $locMsg;
     } else {
+       # no match.
        return '';
     }
 }