]> git.deb.at Git - deb/packages.git/blobdiff - lib/Packages/HTML.pm
projects / deb / packages.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
Revert r143 for DoShow.pm, I accidently *reduced* imports, breaking it
[deb/packages.git] / lib / Packages / HTML.pm
diff --git a/lib/Packages/HTML.pm b/lib/Packages/HTML.pm
index 84bc989c2199f95928f74be60120a4e352ce099c..9f019fb79449758b1fc73701ae07a7b9c665b809 100644 (file)
--- a/lib/Packages/HTML.pm
+++ b/lib/Packages/HTML.pm
@@ -52,7 +52,7 @@ sub title {
 }
 
 sub marker {
-    return "[<span class=\"pred\">$_[0]</span>]";
+    return "[<strong class=\"pmarker\">$_[0]</strong>]";
 }
 
 sub pdesc {
@@ -69,7 +69,7 @@ sub pdesc {
 }
 
 sub pdeplegend {
-    my $str = "<table border=\"1\" summary=\"legend\"><tr>\n";
+    my $str = "<table id=\"pdeplegend\" summary=\"legend\"><tr>\n";
 
     foreach my $entry (@_) {
        $str .= "<td><img src=\"$ROOT/Pics/$entry->[0].gif\" alt=\"[$entry->[0]]\" width=\"16\" height=\"16\">= $entry->[1]</td>";
@@ -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 { "<a href=\"$ROOT/$path/$_\">$_</a>" } @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 {
@@ -376,7 +382,7 @@ sub header {
        $checked_searchon{names} = "checked=\"checked\""
                if $values{searchon} eq 'default';
        $search_in_header = <<MENU;
-<form method="GET" action="$SEARCH_CGI">
+<form method="GET" action="$SEARCH_URL">
 <div id="hpacketsearch">
 <input type="hidden" name="debug" value="$values{debug}">
 <input type="hidden" name="suite" value="$values{suite}">
@@ -454,6 +460,7 @@ $KEYWORDS_LINE
 $DESC_LINE
 $meta
 <link href="$ROOT/debian.css" rel="stylesheet" type="text/css" media="all">
+<link href="$ROOT/packages.css" rel="stylesheet" type="text/css" media="all">
 </head>
 <body>
 <div id="header">