X-Git-Url: https://git.deb.at/w?a=blobdiff_plain;f=lib%2FPackages%2FHTML.pm;h=9f019fb79449758b1fc73701ae07a7b9c665b809;hb=8ff91f6f7c49f02b99710cdc7a6286c3f1e41508;hp=1a68b5f290581d79726293f68b7caedc4d7dd468;hpb=e0340162e87a8f62367d0b41243836eb256444e7;p=deb%2Fpackages.git
diff --git a/lib/Packages/HTML.pm b/lib/Packages/HTML.pm
index 1a68b5f..9f019fb 100644
--- a/lib/Packages/HTML.pm
+++ b/lib/Packages/HTML.pm
@@ -52,7 +52,7 @@ sub title {
}
sub marker {
- return "[$_[0]]";
+ return "[$_[0]]";
}
sub pdesc {
@@ -69,7 +69,7 @@ sub pdesc {
}
sub pdeplegend {
- my $str = "
\n";
+ my $str = "\n";
foreach my $entry (@_) {
$str .= " [0].gif\" alt=\"[$entry->[0]]\" width=\"16\" height=\"16\">= $entry->[1] | ";
@@ -297,7 +297,13 @@ sub print_deps {
push @res_pkgs, dep_item( "$ROOT/$path/$p_name",
$p_name, "$pkg_version$arch_str" );
} elsif ($arch eq 'virtual') {
- $short_desc = "virtual package";
+ my @provided_by = split /\s/, $short_desc;
+ $short_desc = "virtual package provided by ";
+ if (@provided_by < 10) {
+ $short_desc .= join( ', ',map { "$_" } @provided_by);
+ } else {
+ $short_desc .= scalar(@provided_by)." packages";
+ }
push @res_pkgs, dep_item( "$ROOT/$path/$p_name",
$p_name, "$pkg_version$arch_str", $short_desc );
} else {
@@ -372,11 +378,11 @@ sub header {
all => "",
sourcenames => "",
contents => "");
- $checked_searchon{$params{searchon}} = "checked=\"checked\"";
+ $checked_searchon{$values{searchon}} = "checked=\"checked\"";
$checked_searchon{names} = "checked=\"checked\""
- if $params{searchon} eq 'default';
+ if $values{searchon} eq 'default';
$search_in_header = <