X-Git-Url: https://git.deb.at/?a=blobdiff_plain;ds=sidebyside;f=lib%2FPackages%2FDoShow.pm;h=1b6979996a639a80477fa069c01c9f9f032e6f67;hb=8ff91f6f7c49f02b99710cdc7a6286c3f1e41508;hp=b7dfa31e3264d1c8a8bb6d26d9e4ac8867019450;hpb=ef769eaccb9ebf7f49b8c3240c9c4d6980072ee5;p=deb%2Fpackages.git diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm index b7dfa31..1b69799 100644 --- 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; @@ -177,7 +177,7 @@ sub do_show { if ($suite eq "experimental") { note( gettext( "Experimental package"), - gettext( "Warning: This package is from the experimental distribution. That means it is likely unstable or buggy, and it may even cause data loss. If you ignore this warning and install it nevertheless, you do it on your own risk.")."
". + gettext( "Warning: This package is from the experimental distribution. That means it is likely unstable or buggy, and it may even cause data loss. If you ignore this warning and install it nevertheless, you do it on your own risk.")."
". gettext( "Users of experimental packages are encouraged to contact the package maintainers directly in case of problems." ) ); } @@ -206,7 +206,7 @@ sub do_show { $package_page .= "
".gettext("Architecture")." | ".gettext("Files")." | ".gettext( "Package Size")." | ".gettext("Installed Size")." | "; #FIXME: css + $package_page .= ' | '; $package_page .= floor(($sizes_deb->{$a}/102.4)+0.5)/10 . " kB"; - $package_page .= " | \n"; #FIXME: css + $package_page .= ' | '; $package_page .= $sizes_inst->{$a} . " kB"; $package_page .= " | \n"; } @@ -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 .= "
---|
%s | %s | %s | ", gettext("File"), gettext("Size (in kB)"), @@ -400,8 +400,8 @@ sub do_show { $src_url .= "/$source_dir/$src_file_name"; $package_page .= "
---|---|---|
$src_file_name | \n" - ."".sprintf("%.1f", (floor(($src_file_size/102.4)+0.5)/10))." | \n" - ."$src_file_md5 | ".sprintf("%.1f", (floor(($src_file_size/102.4)+0.5)/10))." | \n" + ."$src_file_md5 | "; } $package_page .= "