summaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin
diff options
context:
space:
mode:
Diffstat (limited to 'IkiWiki/Plugin')
-rw-r--r--IkiWiki/Plugin/pagetemplate.pm40
-rw-r--r--IkiWiki/Plugin/skeleton.pm8
2 files changed, 48 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
diff --git a/IkiWiki/Plugin/skeleton.pm b/IkiWiki/Plugin/skeleton.pm
index fb4cfe9af..d1a50c03b 100644
--- a/IkiWiki/Plugin/skeleton.pm
+++ b/IkiWiki/Plugin/skeleton.pm
@@ -18,6 +18,7 @@ sub import { #{{{
hook(type => "sanitize", id => "skeleton", call => \&sanitize);
hook(type => "format", id => "skeleton", call => \&format);
hook(type => "pagetemplate", id => "skeleton", call => \&pagetemplate);
+ hook(type => "templatefile", id => "skeleton", call => \&templatefile);
hook(type => "delete", id => "skeleton", call => \&delete);
hook(type => "change", id => "skeleton", call => \&change);
hook(type => "cgi", id => "skeleton", call => \&cgi);
@@ -86,6 +87,13 @@ sub pagetemplate (@) { #{{{
debug("skeleton plugin running as a pagetemplate hook");
} # }}}
+sub templatefile (@) { #{{{
+ my %params=@_;
+ my $page=$params{page};
+
+ debug("skeleton plugin running as a templatefile hook");
+} # }}}
+
sub delete (@) { #{{{
my @files=@_;