From: Errietta Kostala Date: Thu, 16 Apr 2015 08:37:44 +0000 (+0000) Subject: Remove silly DOCTYPE X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=master;p=scpubgit%2FApp-SCS.git Remove silly DOCTYPE --- diff --git a/lib/App/SCS/PageSet.pm b/lib/App/SCS/PageSet.pm index e44522c..3f3d5d6 100644 --- a/lib/App/SCS/PageSet.pm +++ b/lib/App/SCS/PageSet.pm @@ -200,7 +200,11 @@ sub _extract_from_html { sub _extract_from_md { my ($self, $md) = @_; - $self->_extract_from_html(markdown($md, { document_format => 'complete' })); + + my $html = markdown($md, { document_format => 'complete' }); + + $html =~ s###g; + $self->_extract_from_html($html); } 1;