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 b7dfa31e3264d1c8a8bb6d26d9e4ac8867019450..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;
@@ -345,12 +345,12 @@ sub do_show {
                    # display dependencies
                    #
                    my $dep_list;
-                   $dep_list = print_src_deps( \%packages, $opts, $pkg,
-                                               $page->get_dep_field('build-depends'),
-                                               'build-depends' );
-                   $dep_list .= print_src_deps( \%packages, $opts, $pkg,
-                                                $page->get_dep_field('build-depends-indep'),
-                                                'build-depends-indep' );
+                   $dep_list = print_deps( \%packages, $opts, $pkg,
+                                           $page->get_dep_field('build-depends'),
+                                           'build-depends' );
+                   $dep_list .= print_deps( \%packages, $opts, $pkg,
+                                            $page->get_dep_field('build-depends-indep'),
+                                            'build-depends-indep' );
 
                    if ( $dep_list ) {
                        $package_page .= "<div id=\"pdeps\">\n";
@@ -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',