X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoShow.pm;h=6852c13a657c9033c00b913385f6d060761893f4;hb=ab47ae363dddbc35743572c62fae6350dcb7cf96;hp=076e11f7c3826a909ed459b412eb7a2e898c6b3f;hpb=dc1f8cc1360f5abb632e30e72753e2e132ff9290;p=deb%2Fpackages.git
diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm
index 076e11f..6852c13 100644
--- a/lib/Packages/DoShow.pm
+++ b/lib/Packages/DoShow.pm
@@ -81,7 +81,7 @@ sub do_show {
if ($suite eq $_) {
$$menu .= "[ $_ ] ";
} else {
- $$menu .= "[ $_ ] ";
+ $$menu .= "[ $suite})."\">$_ ] ";
}
}
$$menu .= '
';
@@ -147,16 +147,16 @@ sub do_show {
# $short_desc = conv_desc( $lang, $short_desc );
my @menu = ( [ _g( "Distribution:" ),
_g( "Overview over this suite" ),
- "$ROOT/$suite/",
+ make_url("/",''),
$suite ],
[ _g( "Section:" ),
_g( "All packages in this section" ),
- "$ROOT/$suite/$subsection/",
+ make_url("$subsection/",''),
$subsection ], );
my $source = $page->get_src('package');
push @menu, [ _g( "Source:" ),
_g( "Source package building this package" ),
- "$ROOT/$suite/source/$source",
+ make_url($source,'',{source=>'source'}),
$source ] if $source;
$$menu .= simple_menu( @menu );
@@ -171,7 +171,7 @@ sub do_show {
$package_page .= title( $title );
if (my $provided_by = $page->{provided_by}) {
- note( _g( "This is also a virtual package provided by ").join( ', ', map { "$_" } @$provided_by) );
+ note( _g( "This is also a virtual package provided by ").join( ', ', map { "$_" } @$provided_by) );
}
if ($suite eq "experimental") {
@@ -228,7 +228,7 @@ sub do_show {
$package_page .= "