X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FPlack%2FApp%2FGruntmaster%2FHTML.pm;h=8df45ee4f839113259def81fcadf982c14e813d2;hb=3dbe882702b33302251aee9cc2d1d54b631ab861;hp=8ddd9e1971b3170e9b8380be1a3d606ec2319d6c;hpb=7cbc093ea2bc5b60c8882ea2358af8cb200e58fc;p=plack-app-gruntmaster.git diff --git a/lib/Plack/App/Gruntmaster/HTML.pm b/lib/Plack/App/Gruntmaster/HTML.pm index 8ddd9e1..8df45ee 100644 --- a/lib/Plack/App/Gruntmaster/HTML.pm +++ b/lib/Plack/App/Gruntmaster/HTML.pm @@ -11,9 +11,11 @@ use Data::Dumper qw/Dumper/; sub ftime ($) { POSIX::strftime '%c', localtime shift } sub literal ($) { + my ($html) = @_; + return unless $html; my $b = HTML::TreeBuilder->new; $b->ignore_unknown(0); - $b->parse(shift // ''); + $b->parse($html); HTML::Element::Library::super_literal $b->guts->as_HTML; } @@ -90,7 +92,7 @@ $logo =~ s/(\s+)/ /g; sub process_skel { my ($tree, %args) = @_; - $tree->fid('logo')->replace_with(literal $logo); + $tree->fid('logo')->replace_with(HTML::Element::Library::super_literal $logo); $tree->content_handler( title => $args{title}, content => literal $args{meat});