exit with error if Text::Typography cannot be loaded

master
joey 2007-06-05 19:06:54 +00:00
parent 435e06bce1
commit 9dc9c113cc
1 changed files with 1 additions and 1 deletions

View File

@ -22,7 +22,7 @@ sub sanitize (@) { #{{{
my %params=@_;
eval q{use Text::Typography};
return $params{content} if $@;
error($@) if $@;
my $attributes=defined $config{typographyattributes} ? $config{typographyattributes} : '3';
return Text::Typography::typography($params{content}, $attributes);