Add initial version of a postcomment plugin (temporarily namespaced as smcvpostcomment)

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

diff --git a/IkiWiki/Plugin/orphans.pm b/IkiWiki/Plugin/orphans.pm
index b910758e0353e9d5d2762bbce41d009490fed120..32cbc5dd5508d3df58945ebef75a80704034c7ad 100644 (file)
--- a/IkiWiki/Plugin/orphans.pm
+++ b/IkiWiki/Plugin/orphans.pm
@@ -43,7 +43,7 @@ sub preprocess (@) { #{{{
                next if grep { 
                        length $_ &&
                        ($_ !~ /\/\Q$discussion\E$/i || ! $config{discussion}) &&
                next if grep { 
                        length $_ &&
                        ($_ !~ /\/\Q$discussion\E$/i || ! $config{discussion}) &&

-                       bestlink($page, $_) !~ /^($page|)$/ 
+                       bestlink($page, $_) !~ /^(\Q$page\E|)$/ 

                } @{$links{$page}};
                push @orphans, $page;
        }
                } @{$links{$page}};
                push @orphans, $page;
        }