소스 검색

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;
     $saying =~ s/[\s,!?.:;)(\"]+//o;
-    while ($saying =~ s/([^\s,!?.:;)(\"]+)[\s,!?.:;)(\"]+//og) {
+    while ($saying =~ s/([^\s,!?.:;)(\"]+)([\s,!?.:;)(\"]+)?//og) {
         $word = $1;
         $stats->{words}{$nick}++;
         $stats->{word_times}{$nick}[$tod]++;