Merge commit 'remotes/smcv/ready/among'
commit
3d27dac809
|
@ -38,13 +38,22 @@ sub preprocess (@) {
|
||||||
# Needs to update whenever a page is added or removed, so
|
# Needs to update whenever a page is added or removed, so
|
||||||
# register a dependency.
|
# register a dependency.
|
||||||
add_depends($params{page}, $params{pages});
|
add_depends($params{page}, $params{pages});
|
||||||
|
add_depends($params{page}, $params{among}) if exists $params{among};
|
||||||
|
|
||||||
my %counts;
|
my %counts;
|
||||||
my $max = 0;
|
my $max = 0;
|
||||||
foreach my $page (pagespec_match_list([keys %links],
|
foreach my $page (pagespec_match_list([keys %links],
|
||||||
$params{pages}, location => $params{page})) {
|
$params{pages}, location => $params{page})) {
|
||||||
use IkiWiki::Render;
|
use IkiWiki::Render;
|
||||||
$counts{$page} = scalar(IkiWiki::backlinks($page));
|
|
||||||
|
my @backlinks = IkiWiki::backlink_pages($page);
|
||||||
|
|
||||||
|
if (exists $params{among}) {
|
||||||
|
@backlinks = pagespec_match_list(\@backlinks,
|
||||||
|
$params{among}, location => $params{page});
|
||||||
|
}
|
||||||
|
|
||||||
|
$counts{$page} = scalar(@backlinks);
|
||||||
$max = $counts{$page} if $counts{$page} > $max;
|
$max = $counts{$page} if $counts{$page} > $max;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -63,6 +72,8 @@ sub preprocess (@) {
|
||||||
|
|
||||||
my $res = "<div class='pagecloud'>\n";
|
my $res = "<div class='pagecloud'>\n";
|
||||||
foreach my $page (sort keys %counts) {
|
foreach my $page (sort keys %counts) {
|
||||||
|
next unless $counts{$page} > 0;
|
||||||
|
|
||||||
my $class = $classes[$counts{$page} * scalar(@classes) / ($max + 1)];
|
my $class = $classes[$counts{$page} * scalar(@classes) / ($max + 1)];
|
||||||
$res .= "<span class=\"$class\">".
|
$res .= "<span class=\"$class\">".
|
||||||
htmllink($params{page}, $params{destpage}, $page).
|
htmllink($params{page}, $params{destpage}, $page).
|
||||||
|
|
|
@ -24,13 +24,19 @@ sub calculate_backlinks () {
|
||||||
$backlinks_calculated=1;
|
$backlinks_calculated=1;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub backlinks ($) {
|
sub backlink_pages ($) {
|
||||||
my $page=shift;
|
my $page=shift;
|
||||||
|
|
||||||
calculate_backlinks();
|
calculate_backlinks();
|
||||||
|
|
||||||
|
return keys %{$backlinks{$page}};
|
||||||
|
}
|
||||||
|
|
||||||
|
sub backlinks ($) {
|
||||||
|
my $page=shift;
|
||||||
|
|
||||||
my @links;
|
my @links;
|
||||||
foreach my $p (keys %{$backlinks{$page}}) {
|
foreach my $p (backlink_pages($page)) {
|
||||||
my $href=urlto($p, $page);
|
my $href=urlto($p, $page);
|
||||||
|
|
||||||
# Trim common dir prefixes from both pages.
|
# Trim common dir prefixes from both pages.
|
||||||
|
|
|
@ -12,4 +12,14 @@ And here's how to create a table of all the pages on the wiki:
|
||||||
|
|
||||||
\[[!pagestats style="table"]]
|
\[[!pagestats style="table"]]
|
||||||
|
|
||||||
|
The optional `among` parameter limits counting to pages that match a
|
||||||
|
[[ikiwiki/PageSpec]]. For instance, to display a cloud of tags used on blog
|
||||||
|
entries, you could use:
|
||||||
|
|
||||||
|
\[[!pagestats pages="tags/*" among="blog/posts/*"]]
|
||||||
|
|
||||||
|
or to display a cloud of tags related to Linux, you could use:
|
||||||
|
|
||||||
|
\[[!pagestats pages="tags/* and not tags/linux" among="tagged(linux)"]]
|
||||||
|
|
||||||
[[!meta robots="noindex, follow"]]
|
[[!meta robots="noindex, follow"]]
|
||||||
|
|
Loading…
Reference in New Issue