[UBUNTU] Packages::DoSearchContents: Don't die when no information is available

[deb/packages.git] / lib / Packages / DoSearchContents.pm

diff --git a/lib/Packages/DoSearchContents.pm b/lib/Packages/DoSearchContents.pm
index b28717f8ce7416e859a42bb97792d730d8018c8b..48fece9f2a3951cf0e5c72dc1640c6fc1d9412a8 100644 (file)
--- a/lib/Packages/DoSearchContents.pm
+++ b/lib/Packages/DoSearchContents.pm
@@ -58,6 +58,10 @@ sub do_search_contents {
        # full filename search is tricky
        my $ffn = $mode eq 'filename';
 
+       unless (-e "$DBDIR/contents/reverse_$suite.db") {
+           fatal_error($cat->g("No contents information available for this suite"));
+           return;
+       }
        my $reverses = tie my %reverses, 'DB_File', "$DBDIR/contents/reverse_$suite.db",
            O_RDONLY, 0666, $DB_BTREE
            or die "Failed opening reverse DB: $!";