[project @ 2000-05-01 09:24:56 by doogie]

Invert the case of -s.  thinko.

diff --git a/Debbugs/DBase.pm b/Debbugs/DBase.pm
index 913fd1f6c832e08fc6f4beddf5de032d3c532697..1fda1eec8c112e033e47031e96de042411efff00 100644 (file)
--- a/Debbugs/DBase.pm
+++ b/Debbugs/DBase.pm
@@ -215,7 +215,7 @@ sub GetBugList
                    my @files = grep { /\d*\d\d.status/ } readdir($dir);
                    close $dir;
                    foreach (@files) {
-                       next if ( -s "$prefix$_1/$_2/$_3/$_" );
+                       next if ( ! -s "$prefix$_1/$_2/$_3/$_" );
                        s/.status$//;
                        push @ret, $_;
 #                      print "$_ -> $_1/$_2/$_3/$_\n";