X-Git-Url: https://git.deb.at/w?a=blobdiff_plain;ds=sidebyside;f=lib%2FPackages%2FDoShow.pm;h=cfe7a90f783ff8486ae74f909dc1b6ed06c6de36;hb=0e673db69e902d63ebb471926c06547e685db610;hp=e3dc1115eee9b8c2a83f51eedb39477886f6e9d3;hpb=7206cc1ddf92f2a9551567a1ba7b76eb206dacee;p=deb%2Fpackages.git diff --git a/lib/Packages/DoShow.pm b/lib/Packages/DoShow.pm index e3dc111..cfe7a90 100644 --- a/lib/Packages/DoShow.pm +++ b/lib/Packages/DoShow.pm @@ -119,7 +119,22 @@ 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 )) { + next if $tag =~ /^special:/; + push @tags, [ $facet, $_ ]; + } + } else { + next if $tag =~ /^special:/; + push @tags, [ $facet, $tag ]; + } + } + $contents{tags} = \@tags; $contents{debtags_voc} = \%debtags;