-# $long_desc = conv_desc( $lang, $long_desc );
-# $short_desc = conv_desc( $lang, $short_desc );
-
- $$menu .= simple_menu( [ gettext( "Distribution:" ),
- gettext( "Overview over this suite" ),
- "$ROOT/$suite/",
- $suite ],
- [ gettext( "Section:" ),
- gettext( "All packages in this section" ),
- "$ROOT/$suite/$subsection/",
- $subsection ],
- );
-
- my $title .= sprintf( gettext( "Package: %s (%s)" ), $pkg, $v_str );
+ my @menu = ( [ _g( "Distribution:" ),
+ _g( "Overview over this suite" ),
+ make_url("/",''),
+ $suite ],
+ [ _g( "Section:" ),
+ _g( "All packages in this section" ),
+ make_url("$subsection/",''),
+ $subsection ], );
+ push @menu, [ _g( "Source:" ),
+ _g( "Source package building this package" ),
+ make_url($source,'',{source=>'source'}),
+ $source ] if $source;
+ $$menu .= simple_menu( @menu );
+
+ my $v_str = $version;
+ my $multiple_versions = grep { $_ ne $version } values %$versions;
+ $v_str .= _g(" and others") if $multiple_versions;
+ my $title .= sprintf( _g( "Package: %s (%s)" ), $pkg, $v_str );