1 files changed, 40 insertions, 0 deletions
diff --git a/IkiWiki/Plugin/pagetemplate.pm b/IkiWiki/Plugin/pagetemplate.pm
new file mode 100644
index 000000000..b5ebf623d
--- /dev/null
+++ b/IkiWiki/Plugin/pagetemplate.pm
@@ -0,0 +1,40 @@
+#!/usr/bin/perl
+package IkiWiki::Plugin::pagetemplate;
+
+use warnings;
+use strict;
+use IkiWiki 2.00;
+
+my %templates;
+
+sub import { #{{{
+	hook(type => "preprocess", id => "pagetemplate", call => \&preprocess);
+	hook(type => "templatefile", id => "pagetemplate", call => \&templatefile);
+} # }}}
+
+sub preprocess (@) { #{{{
+	my %params=@_;
+
+	if (! exists $params{template} ||
+	    $params{template} !~ /^[-A-Za-z0-9._+]+$/ ||
+	    ! defined IkiWiki::template_file($params{template})) {
+		 return "[[pagetemplate ".gettext("bad or missing template")."]]";
+	}
+
+	if ($params{page} eq $params{destpage}) {
+		$templates{$params{page}}=$params{template};
+	}
+
+} # }}}
+
+sub templatefile (@) { #{{{
+	my %params=@_;
+
+	if (exists $templates{$params{page}}) {
+		return $templates{$params{page}};
+	}
+	
+	return undef;
+} # }}}
+
+1