summaryrefslogtreecommitdiff
path: root/doc/bugs/pagestats_plugin_broken.mdwn
diff options
context:
space:
mode:
Diffstat (limited to 'doc/bugs/pagestats_plugin_broken.mdwn')
-rw-r--r--doc/bugs/pagestats_plugin_broken.mdwn16
1 files changed, 15 insertions, 1 deletions
diff --git a/doc/bugs/pagestats_plugin_broken.mdwn b/doc/bugs/pagestats_plugin_broken.mdwn
index 0db501f47..cad68fa06 100644
--- a/doc/bugs/pagestats_plugin_broken.mdwn
+++ b/doc/bugs/pagestats_plugin_broken.mdwn
@@ -8,6 +8,20 @@ My perl knowledge is very limited, but the call :
return allways 2, which seems to me "obvious", because the backlinks() function is returning two array of links...
-Did I forget something ?
+Patch is :
+
+ --- /usr/share/perl5/IkiWiki/Plugin/pagestats.pm 2007-04-27 04:33:43.000000000 +0200
+ +++ ./pagestats.pm 2007-05-12 16:47:14.000000000 +0200
+ @@ -36,7 +36,7 @@
+ if (pagespec_match($page, $params{pages}, location => $params{page})) {
+ use IkiWiki::Render;
+ my @bl = IkiWiki::backlinks($page);
+ - $counts{$page} = scalar(@bl);
+ + $counts{$page} = scalar(@{$bl[0]})+scalar(@{$bl[1]});
+ $max = $counts{$page} if $counts{$page} > $max;
+ }
+ }
+
+
--[[users/hb]] \ No newline at end of file