Use exact wallclocktime when available (it's in the 'perl' package)

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

diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm
index b1bf7acbadb00939daf7a68561be053b34807822..e9bbed81b7f94add75f9b3aa2ee9de6709493b04 100644 (file)
--- a/lib/Packages/DoShow.pm
+++ b/lib/Packages/DoShow.pm
@@ -6,7 +6,7 @@ use POSIX;
 use URI::Escape;
 use HTML::Entities;
 use DB_File;
-use Benchmark;
+use Benchmark ':hireswallclock';
 use Exporter;
 
 use Deb::Versions;
@@ -438,7 +438,7 @@ sub do_show {
                      print_search_field => 'packages',
                      search_field_values => { 
                          keywords => '',
-                         searchon => 'names',
+                         searchon => $opts->{source} ? 'sourcenames' : 'names',
                          arch => 'any',
                          suite => 'all',
                          section => 'all',