]> git.vanrenterghem.biz Git - git.ikiwiki.info.git/blobdiff - t/podcast.t
Write a tip about RTL pages
[git.ikiwiki.info.git] / t / podcast.t
index 1052aea70f005ef13383dab4050b73fc46ba991d..94505a05e2ca70dabcbdd28f4cda14be353fbf9f 100755 (executable)
@@ -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};
@@ -37,7 +37,7 @@ sub podcast {
                'simplepost'    => undef,
                'piano.mp3'     => 'audio/mpeg',
                'scroll.3gp'    => 'video/3gpp',
-               'walter.ogg'    => 'video/x-theora+ogg',
+               'walter.ogg'    => 'audio/ogg',
        );
 
        for my $format (qw(atom rss)) {