Changeset 520

Timestamp:

11/10/08 13:23:53 (3 years ago)

Author:

OlivierRaginel

Message:

Item38: Fix regexp to filter files to be more strict, otherwise it might match configurationlog.txt

File:

• trunk/PageStatsPlugin/lib/TWiki/Plugins/PageStatsPlugin.pm (modified) (1 diff)

trunk/PageStatsPlugin/lib/TWiki/Plugins/PageStatsPlugin.pm

@@ -78 +78 @@
     opendir DATADIR, $dd or die "Can't open DataDir: $!";
     my @pagestats = ();
-    foreach my $l ( grep /log.*.txt/, readdir DATADIR ) {
+    foreach my $l ( grep /^log.*\.txt$/, readdir DATADIR ) {
         open( my $logfile, "< $dd/$l" ) or next;
         while( <$logfile> ) {