1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
#!/usr/bin/perl
# Ikiwiki skeleton plugin. Replace "skeleton" with the name of your plugin
# in the lines below, remove hooks you don't use, and flesh out the code to
# make it do something.
package IkiWiki::Plugin::skeleton;
use warnings;
use strict;
use IkiWiki;
sub import { #{{{
IkiWiki::hook(type => "getopt", id => "skeleton",
call => \&getopt);
IkiWiki::hook(type => "checkconfig", id => "skeleton",
call => \&checkconfig);
IkiWiki::hook(type => "preprocess", id => "skeleton",
call => \&preprocess);
IkiWiki::hook(type => "filter", id => "skeleton",
call => \&filter);
IkiWiki::hook(type => "htmlize", id => "skeleton",
call => \&htmlize);
IkiWiki::hook(type => "sanitize", id => "skeleton",
call => \&sanitize);
IkiWiki::hook(type => "pagetemplate", id => "skeleton",
call => \&pagetemplate);
IkiWiki::hook(type => "delete", id => "skeleton",
call => \&delete);
IkiWiki::hook(type => "change", id => "skeleton",
call => \&change);
IkiWiki::hook(type => "cgi", id => "skeleton",
call => \&cgi);
IkiWiki::hook(type => "savestate", id => "savestate",
call => \&savestate);
} # }}}
sub getopt () { #{{{
IkiWiki::debug("skeleton plugin getopt");
} #}}}
sub checkconfig () { #{{{
IkiWiki::debug("skeleton plugin checkconfig");
} #}}}
sub preprocess (@) { #{{{
my %params=@_;
return "skeleton plugin result";
} # }}}
sub filter (@) { #{{{
my %params=@_;
IkiWiki::debug("skeleton plugin running as filter");
return $params{content};
} # }}}
sub htmlize ($) { #{{{
my $content=shift;
IkiWiki::debug("skeleton plugin running as htmlize");
return $content;
} # }}}
sub sanitize ($) { #{{{
my $content=shift;
IkiWiki::debug("skeleton plugin running as a sanitizer");
return $content;
} # }}}
sub pagetemplate (@) { #{{{
my %params=@_;
my $page=$params{page};
my $template=$params{template};
IkiWiki::debug("skeleton plugin running as a pagetemplate hook");
} # }}}
sub delete (@) { #{{{
my @files=@_;
IkiWiki::debug("skeleton plugin told that files were deleted: @files");
} #}}}
sub change (@) { #{{{
my @files=@_;
IkiWiki::debug("skeleton plugin told that changed files were rendered: @files");
} #}}}
sub cgi ($) { #{{{
my $cgi=shift;
IkiWiki::debug("skeleton plugin running in cgi");
} #}}}
sub savestate () { #{{{
IkiWiki::debug("skeleton plugin running in savestate");
} #}}}
1
|