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
|
#!/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 => "checkconfig", id => "skeleton",
call => \&checkconfig);
IkiWiki::hook(type => "preprocess", id => "skeleton",
call => \&preprocess);
IkiWiki::hook(type => "filter", id => "skeleton",
call => \&filter);
IkiWiki::hook(type => "delete", id => "skeleton",
call => \&delete);
IkiWiki::hook(type => "render", id => "skeleton",
call => \&render);
IkiWiki::hook(type => "cgi", id => "skeleton",
call => \&cgi);
} # }}}
sub checkconfig () { #{{{
IkiWiki::debug("skeleton plugin checkconfig");
} #}}}
sub preprocess (@) { #{{{
my %params=@_;
return "skeleton plugin result";
} # }}}
sub filter ($) { #{{{
my $content=shift;
IkiWiki::debug("skeleton plugin running as filter");
return $content;
} # }}}
sub delete (@) { #{{{
my @files=@_;
IkiWiki::debug("skeleton plugin told that files were deleted: @files");
} #}}}
sub render (@) { #{{{
my @files=@_;
IkiWiki::debug("skeleton plugin told that files were rendered: @files");
} #}}}
sub cgi ($) { #{{{
my $cgi=shift;
IkiWiki::debug("skeleton plugin running in cgi");
} #}}}
1
|