瀏覽代碼

Fix word counting bug.. it was matching "everything"(almost..)

Morten Brix Pedersen 25 年之前
父節點
當前提交
54cf6c6368
共有 1 個文件被更改,包括 3 次插入1 次删除
  1. 3 1
      pisg.pl

+ 3 - 1
pisg.pl

@@ -883,7 +883,9 @@ sub parse_words
         $words{$nick}++;
         # remove uninteresting words
         next unless (length($word) >= $conf->{wordlength});
-        next if ($word =~ /$conf->{ignorewords}/);
+        if ($conf->{ignorewords}) {
+            next if ($word =~ /$conf->{ignorewords}/);
+        }
 
         # ignore contractions
         next if ($word =~ m/'..?$/);