urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

pagestats: add disp parameter

master
Louis 2014-02-22 22:30:09 +00:00 committed by Simon McVittie
parent ab768a62c6
commit cd5a24d8b4
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
IkiWiki/Plugin/pagestats.pm
View File

@ -31,6 +31,19 @@ sub getsetup () {
}, },
} }
sub linktext ($%) {
# Return the text of the link to a tag, depending on option linktext.
my ($page, %params) = @_;
if (exists $params{disp} &&
exists $pagestate{$page} &&
exists $pagestate{$page}{meta}{$params{disp}}) {
return $pagestate{$page}{meta}{$params{disp}};
}
else {
return undef;
}
}
sub preprocess (@) { sub preprocess (@) {
my %params=@_; my %params=@_;
$params{pages}="*" unless defined $params{pages}; $params{pages}="*" unless defined $params{pages};
@ -84,7 +97,7 @@ sub preprocess (@) {
return "<table class='".(exists $params{class} ? $params{class} : "pageStats")."'>\n". return "<table class='".(exists $params{class} ? $params{class} : "pageStats")."'>\n".
join("\n", map { join("\n", map {
"<tr><td>". "<tr><td>".
htmllink($params{page}, $params{destpage}, $_, noimageinline => 1). htmllink($params{page}, $params{destpage}, $_, noimageinline => 1, linktext => linktext($_, %params)).
"</td><td>".$counts{$_}."</td></tr>" "</td><td>".$counts{$_}."</td></tr>"
} }
sort { $counts{$b} <=> $counts{$a} } keys %counts). sort { $counts{$b} <=> $counts{$a} } keys %counts).
@ -107,7 +120,7 @@ sub preprocess (@) {
$res.="<li>" if $style eq 'list'; $res.="<li>" if $style eq 'list';
$res .= "<span class=\"$class\">". $res .= "<span class=\"$class\">".
htmllink($params{page}, $params{destpage}, $page). htmllink($params{page}, $params{destpage}, $page, linktext => linktext($page, %params)).
"</span>\n"; "</span>\n";
$res.="</li>" if $style eq 'list'; $res.="</li>" if $style eq 'list';