- Fix <tags> handling in <files>.
- Fix counting of the number of tags for font-size: property in the tag list.
This commit is contained in:
parent
68862162a7
commit
fd80d8a80e
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/head/; revision=38973
1 changed files with 8 additions and 5 deletions
|
@ -83,7 +83,7 @@ sub xml_start {
|
|||
$items[$ci]{fc}++;
|
||||
}
|
||||
|
||||
if ($treeindex == 3 &&
|
||||
if (($treeindex == 3 || $treeindex == 5) &&
|
||||
$element eq "tags") {
|
||||
$tag = "";
|
||||
}
|
||||
|
@ -98,6 +98,11 @@ sub xml_end {
|
|||
@{$items[$ci]{tags}} = split(/,/, $tag);
|
||||
addtags($tag);
|
||||
}
|
||||
if ($treeindex == 5 &&
|
||||
$element eq "tags") {
|
||||
@{$items[$ci]{files}{$items[$ci]{fc}}{tags}} = split(/,/, $tag);
|
||||
addtags($tag);
|
||||
}
|
||||
|
||||
$values[$treeindex] = ();
|
||||
$treeindex--;
|
||||
|
@ -179,9 +184,7 @@ sub xml_char {
|
|||
return;
|
||||
}
|
||||
if ($tree[5] eq "tags") {
|
||||
@{$items[$ci]{files}{$items[$ci]{fc}}{tags}} = split(/,/, $value);
|
||||
addtags($value);
|
||||
addtags("", $items[$ci]{tags});
|
||||
$tag .= $value;
|
||||
return;
|
||||
}
|
||||
goto error;
|
||||
|
@ -432,7 +435,7 @@ sub print_htmlitem {
|
|||
}
|
||||
my $size = 20;
|
||||
my $c = 0;
|
||||
foreach my $tag (sort size(keys(%tags))) {
|
||||
foreach my $tag (sort size keys(%tags)) {
|
||||
my $ftag = $tag;
|
||||
$ftag =~ s/ /_/g;
|
||||
print $fhtml "<font style=\"font-size:${size}pt\"><a href=\"tag-$ftag.html\">$tag</a></font>\n";
|
||||
|
|
Loading…
Reference in a new issue