Преглед на файлове

Minor bugfix from Hanno.

Morten Brix Pedersen преди 22 години
родител
ревизия
d5f81b900d
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      modules/Pisg/Parser/Logfile.pm

+ 1 - 1
modules/Pisg/Parser/Logfile.pm

@@ -543,7 +543,7 @@ sub _parse_words
 
 
     study $saying;
     study $saying;
     $saying =~ s/[\s,!?.:;)(\"]+//o;
     $saying =~ s/[\s,!?.:;)(\"]+//o;
-    while ($saying =~ s/([^\s,!?.:;)(\"]+)[\s,!?.:;)(\"]+//og) {
+    while ($saying =~ s/([^\s,!?.:;)(\"]+)([\s,!?.:;)(\"]+)?//og) {
         $word = $1;
         $word = $1;
         $stats->{words}{$nick}++;
         $stats->{words}{$nick}++;
         $stats->{word_times}{$nick}[$tod]++;
         $stats->{word_times}{$nick}[$tod]++;