X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/d33b31f70638025f19fdfa03a8c2e609faca792a..b5b8c5cec:/t/podcast.t diff --git a/t/podcast.t b/t/podcast.t index a00545b98..f036c3113 100755 --- a/t/podcast.t +++ b/t/podcast.t @@ -3,10 +3,10 @@ use warnings; use strict; BEGIN { - eval q{use XML::Feed; use HTML::Parser; use HTML::LinkExtor}; + eval q{use XML::Feed; use HTML::Parser; use HTML::LinkExtor; use File::MimeInfo}; if ($@) { eval q{use Test::More skip_all => - "XML::Feed and/or HTML::Parser not available"}; + "XML::Feed and/or HTML::Parser or File::MimeInfo not available"}; } else { eval q{use Test::More tests => 136}; @@ -126,7 +126,7 @@ sub single_page_html { my $html = "$tmp/out/pianopost/index.html"; like(_extract_html_content($html, 'content'), qr/has content and/m, q{html body text}); - like(_extract_html_content($html, 'enclosure'), qr/this episode/m, + like(_extract_html_content($html, 'enclosure'), qr/Download/m, q{html enclosure}); my ($href) = _extract_html_links($html, 'piano'); is($href, '/piano.mp3', @@ -135,7 +135,7 @@ sub single_page_html { $html = "$tmp/out/attempted_multiple_enclosures/index.html"; like(_extract_html_content($html, 'content'), qr/has content and/m, q{html body text}); - like(_extract_html_content($html, 'enclosure'), qr/this episode/m, + like(_extract_html_content($html, 'enclosure'), qr/Download/m, q{html enclosure}); ($href) = _extract_html_links($html, 'walter'); is($href, '/walter.ogg', @@ -175,7 +175,7 @@ sub inlined_pages_html { like($contents, qr/has content and only one/m, q{html body text from attempted_multiple_enclosures}); my $enclosures = _extract_html_content($html, 'inlineenclosure'); - like($enclosures, qr/this episode/m, + like($enclosures, qr/Download/m, q{html enclosure}); my ($href) = _extract_html_links($html, 'piano.mp3'); is($href, '/piano.mp3',