add plugin safe/rebuild info (part 3 of 3)
[ikiwiki] / IkiWiki / Plugin / typography.pm
1 #!/usr/bin/perl
2
3 package IkiWiki::Plugin::typography;
4
5 use warnings;
6 use strict;
7 use IkiWiki 2.00;
8
9 sub import { #{{{
10         hook(type => "getopt", id => "typography", call => \&getopt);
11         hook(type => "getsetup", id => "typography", call => \&getsetup);
12         IkiWiki::hook(type => "sanitize", id => "typography", call => \&sanitize);
13 } # }}}
14
15 sub getopt () { #{{{
16         eval q{use Getopt::Long};
17         error($@) if $@;
18         Getopt::Long::Configure('pass_through');
19         GetOptions("typographyattributes=s" => \$config{typographyattributes});
20 } #}}}
21
22 sub getsetup () { #{{{
23         eval q{use Text::Typography};
24         error($@) if $@;
25
26         return
27                 plugin => {
28                         safe => 1,
29                         rebuild => 1,
30                 },
31                 typographyattributes => {
32                         type => "string",
33                         example => "3",
34                         description => "Text::Typography attributes value",
35                         advanced => 1,
36                         safe => 1,
37                         rebuild => 1,
38                 },
39 } #}}}
40
41 sub sanitize (@) { #{{{
42         my %params=@_;
43
44         eval q{use Text::Typography};
45         return $params{content} if $@;
46
47         my $attributes=defined $config{typographyattributes} ? $config{typographyattributes} : '3';
48         return Text::Typography::typography($params{content}, $attributes);
49 } # }}}
50
51 1