]> git.deb.at Git - deb/packages.git/commitdiff
Implement exact filename searching
authorJeroen van Wolffelaar <jeroen@wolffelaar.nl>
Tue, 14 Feb 2006 00:33:15 +0000 (00:33 +0000)
committerJeroen van Wolffelaar <jeroen@wolffelaar.nl>
Tue, 14 Feb 2006 00:33:15 +0000 (00:33 +0000)
cgi-bin/search_contents.pl

index 21aaeabb1eadf267888802b9bc0e7493ccaaf52a..839ffc00f0ad830ab43125f6ff738cefaa942c0c 100755 (executable)
@@ -19,6 +19,11 @@ sub contents() {
 # only thing implemented yet: ends-with search
     my $kw = lc $cgi->param("keywords");
     $kw = reverse $kw;
+    
+    # exact filename searching follows trivially:
+    my $exact = $cgi->param("exact");
+    $kw = "/$kw" if $exact;
+
 # FIXME: ensure $suite is sanitized
     my $suite = 'stable';