X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/9dc9c113cc1b345bb9631f92803b4d0b9426f8e4..bd103811033fa174d24d8dc5b84f0694fd9055ee:/IkiWiki/Plugin/typography.pm?ds=sidebyside diff --git a/IkiWiki/Plugin/typography.pm b/IkiWiki/Plugin/typography.pm index fe6996898..e395b2143 100644 --- a/IkiWiki/Plugin/typography.pm +++ b/IkiWiki/Plugin/typography.pm @@ -6,26 +6,46 @@ use warnings; use strict; use IkiWiki 2.00; -sub import { #{{{ +sub import { hook(type => "getopt", id => "typography", call => \&getopt); + hook(type => "getsetup", id => "typography", call => \&getsetup); IkiWiki::hook(type => "sanitize", id => "typography", call => \&sanitize); -} # }}} +} -sub getopt () { #{{{ +sub getopt () { eval q{use Getopt::Long}; error($@) if $@; Getopt::Long::Configure('pass_through'); GetOptions("typographyattributes=s" => \$config{typographyattributes}); -} #}}} +} -sub sanitize (@) { #{{{ +sub getsetup () { + eval q{use Text::Typography}; + error($@) if $@; + + return + plugin => { + safe => 1, + rebuild => 1, + }, + typographyattributes => { + type => "string", + example => "3", + description => "Text::Typography attributes value", + advanced => 1, + safe => 1, + rebuild => 1, + }, +} + +sub sanitize (@) { my %params=@_; eval q{use Text::Typography}; - error($@) if $@; + return $params{content} if $@; my $attributes=defined $config{typographyattributes} ? $config{typographyattributes} : '3'; return Text::Typography::typography($params{content}, $attributes); -} # }}} +} 1