web commit by hb: typo

[git.ikiwiki.info.git] / IkiWiki / Plugin / brokenlinks.pm

diff --git a/IkiWiki/Plugin/brokenlinks.pm b/IkiWiki/Plugin/brokenlinks.pm
index d9d50f75f48be54b7267c3a541cf39c830478b85..fa34a70089d2fe2ffa651a5a6b001f22cf5141cd 100644 (file)
--- a/IkiWiki/Plugin/brokenlinks.pm
+++ b/IkiWiki/Plugin/brokenlinks.pm
@@ -4,7 +4,7 @@ package IkiWiki::Plugin::brokenlinks;
 
 use warnings;
 use strict;
 
 use warnings;
 use strict;

-use IkiWiki;
+use IkiWiki 2.00;

 
 sub import { #{{{
        hook(type => "preprocess", id => "brokenlinks", call => \&preprocess);
 
 sub import { #{{{
        hook(type => "preprocess", id => "brokenlinks", call => \&preprocess);


@@ -20,7 +20,7 @@ sub preprocess (@) { #{{{
        
        my @broken;
        foreach my $page (keys %links) {
        
        my @broken;
        foreach my $page (keys %links) {

-               if (pagespec_match($page, $params{pages}, $params{page})) {
+               if (pagespec_match($page, $params{pages}, location => $params{page})) {

                        my $discussion=gettext("discussion");
                        foreach my $link (@{$links{$page}}) {
                                next if $link =~ /.*\/\Q$discussion\E/i && $config{discussion};
                        my $discussion=gettext("discussion");
                        foreach my $link (@{$links{$page}}) {
                                next if $link =~ /.*\/\Q$discussion\E/i && $config{discussion};