backlink is just the reverse of link, so..

[ikiwiki.git] / IkiWiki.pm

diff --git a/IkiWiki.pm b/IkiWiki.pm
index 991ff9ecbe14c6456c90bb490704c347a58ed286..cadbfd67f676114309845ef568783384fa057360 100644 (file)
--- a/IkiWiki.pm
+++ b/IkiWiki.pm
@@ -571,7 +571,7 @@ sub match_glob ($$) { #{{{
        $glob=~s/\\\*/.*/g;
        $glob=~s/\\\?/./g;
 
-       return $page=~/^$glob$/;
+       return $page=~/^$glob$/i;
 } #}}}
 
 sub match_link ($$) { #{{{
@@ -586,14 +586,7 @@ sub match_link ($$) { #{{{
 } #}}}
 
 sub match_backlink ($$) { #{{{
-       my $page=shift;
-       my $linkto=shift;
-
-       my $links = $links{$linkto} or return undef;
-       foreach my $p (@$links) {
-               return 1 if lc $p eq $page;
-       }
-       return 0;
+       match_link(reverse @_);
 } #}}}
 
 sub match_creation_day ($$) { #{{{