improve error message if shortcuts.mdwn DNE
[ikiwiki.git] / IkiWiki / Plugin / pagetemplate.pm
1 #!/usr/bin/perl
2 package IkiWiki::Plugin::pagetemplate;
3
4 use warnings;
5 use strict;
6 use IkiWiki 2.00;
7
8 my %templates;
9
10 sub import { #{{{
11         hook(type => "preprocess", id => "pagetemplate", call => \&preprocess);
12         hook(type => "templatefile", id => "pagetemplate", call => \&templatefile);
13 } # }}}
14
15 sub preprocess (@) { #{{{
16         my %params=@_;
17
18         if (! exists $params{template} ||
19             $params{template} !~ /^[-A-Za-z0-9._+]+$/ ||
20             ! defined IkiWiki::template_file($params{template})) {
21                  return "[[pagetemplate ".gettext("bad or missing template")."]]";
22         }
23
24         if ($params{page} eq $params{destpage}) {
25                 $templates{$params{page}}=$params{template};
26         }
27
28         return "";
29 } # }}}
30
31 sub templatefile (@) { #{{{
32         my %params=@_;
33
34         if (exists $templates{$params{page}}) {
35                 return $templates{$params{page}};
36         }
37         
38         return undef;
39 } # }}}
40
41 1