From 598d338b11cbcbf5d87517f3b8fcd99e357a31a2 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kodama.kitenet.net>
Date: Tue, 29 Jan 2008 12:37:39 -0500
Subject: escape wikilinks and preprocessor directives

---
 IkiWiki/Plugin/recentchanges.pm | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

(limited to 'IkiWiki')

diff --git a/IkiWiki/Plugin/recentchanges.pm b/IkiWiki/Plugin/recentchanges.pm
index 5727f9af1..6c9848ba3 100644
--- a/IkiWiki/Plugin/recentchanges.pm
+++ b/IkiWiki/Plugin/recentchanges.pm
@@ -6,8 +6,6 @@ use strict;
 use IkiWiki 2.00;
 
 sub import { #{{{
-	hook(type => "checkconfig", id => "recentchanges",
-		call => \&checkconfig);
 	hook(type => "needsbuild", id => "recentchanges",
 		call => \&needsbuild);
 	hook(type => "preprocess", id => "recentchanges",
@@ -16,15 +14,11 @@ sub import { #{{{
 		call => \&htmlize);
 } #}}}
 
-sub checkconfig () { #{{{
+sub needsbuild () { #{{{
 	my @changes=IkiWiki::rcs_recentchanges(100);
 	updatechanges("*", "recentchanges", \@changes);
 } #}}}
 
-sub needsbuild () { #{{{
-	# TODO
-} #}}}
-
 sub preprocess (@) { #{{{
 	my %params=@_;
 
@@ -96,7 +90,10 @@ sub store ($$) { #{{{
 		shift->(page => $page, destpage => $page, template => $template);
 	});
 
-	writefile($page."._change", $config{srcdir}, $template->output);
+	my $html=$template->output;
+	# escape  wikilinks and preprocessor stuff
+	$html=~s/(?<!\\)\[\[/\\\[\[/g;
+	writefile($page."._change", $config{srcdir}, $html);
 	utime $change->{when}, $change->{when}, "$config{srcdir}/$page._change";
 } #}}}
 
-- 
cgit v1.2.3