X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoShow.pm;h=58026e130095a2ff564d28b9f42607d0611ba863;hb=089a004ae30c4f2ffe436dcf89f819560465e6c3;hp=0f760858f76b291e78594ab7d5130af524a4bb9b;hpb=9a4026fe965e926943d8c4ba74204dddc2190ea9;p=deb%2Fpackages.git diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm index 0f76085..58026e1 100644 --- a/lib/Packages/DoShow.pm +++ b/lib/Packages/DoShow.pm @@ -119,7 +119,20 @@ sub do_show { debug( "Data search and merging took ".timestr($std) ) if DEBUG; my $did = $page->get_newest( 'description' ); - my @tags = map { [ split( /::/, $_) ] } split(/, /, $page->get_newest( 'tag' )); + my @complete_tags = split(/, /, $page->get_newest( 'tag' )); + my @tags; + foreach (@complete_tags) { + my ($facet, $tag) = split( /::/, $_, 2); + # handle tags like devel::{lang:c,lang:c++} + if ($tag =~ s/^\{(.+)\}$/$1/) { + foreach (split( /,/, $tag )) { + push @tags, [ $facet, $_ ]; + } + } else { + push @tags, [ $facet, $tag ]; + } + } + $contents{tags} = \@tags; $contents{debtags_voc} = \%debtags; @@ -140,7 +153,7 @@ sub do_show { $short_desc = encode_entities( $1, "<>&\"" ) if $desc =~ s/^(.*)$//m; my $long_desc = encode_entities( $desc, "<>&\"" ); - + $long_desc =~ s,((ftp|http|https)://[\S~-]+?/?)((\>\;)?[)]?[']?[:.\,]?(\s|$)),$1$3,go; # syntax highlighting -> ']; $long_desc =~ s/\A //o; $long_desc =~ s/\n /\n/sgo; @@ -163,6 +176,9 @@ sub do_show { # # display dependencies # + build_deps( \%packages, $opts, $pkg, + $page->get_dep_field('pre-depends'), + 'depends', \%contents ); build_deps( \%packages, $opts, $pkg, $page->get_dep_field('depends'), 'depends', \%contents );