Add an additional debug output to track $too_many_hits better

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

diff --git a/lib/Packages/Search.pm b/lib/Packages/Search.pm
index 9418f63e0c3037b14cd9ce079c34403f28427ed4..c0555e2bb302b0dfdd241e742c9370ccae205cb4 100644 (file)
--- a/lib/Packages/Search.pm
+++ b/lib/Packages/Search.pm
@@ -413,6 +413,7 @@ sub do_names_search {
     $postfixes->seq( $key, $prefixes, R_CURSOR );
     while (index($key, $keyword) >= 0) {
        if ($prefixes =~ /^\001(\d+)/o) {
+           debug( "$key has too many hits", 2 );
            $too_many_hits += $1;
        } else {
            foreach (split /\000/o, $prefixes) {