Actually search on filenames

diff --git a/lib/Packages/DoSearchContents.pm b/lib/Packages/DoSearchContents.pm
index b1290f29a680919458ae3b65f7c684cbd1b71122..f66ba875a98c7fa54f2ddbb6930c87c6766b4c5a 100644 (file)
--- a/lib/Packages/DoSearchContents.pm
+++ b/lib/Packages/DoSearchContents.pm
@@ -64,7 +64,7 @@ sub do_search_contents {
            or die "Failed opening reverse DB: $!";
 
        if ($ffn) {
            or die "Failed opening reverse DB: $!";
 
        if ($ffn) {

-           open FILENAMES, '-|', 'fgrep', '--', "$DBDIR/contents/filenames_$suite.txt"
+           open FILENAMES, '-|', 'fgrep', '--', "$kw", "$DBDIR/contents/filenames_$suite.txt"

                or die "Failed opening filename table: $!";
            while (<FILENAMES>) {
                chomp;
                or die "Failed opening filename table: $!";
            while (<FILENAMES>) {
                chomp;


@@ -152,6 +152,7 @@ sub searchfile
        last if ($$nres)++ > 100;
     }
 
        last if ($$nres)++ > 100;
     }
 

+# FIXME: use too_many_hits

     return $$nres<100;
 }
 
     return $$nres<100;
 }