about summary refs log tree commit homepage
path: root/t/feed.t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2014-04-21 20:39:54 +0000
committerEric Wong <e@80x24.org>2014-04-23 01:23:47 +0000
commitc5f0993848ffe4e781015e0b19fadba3f16692b9 (patch)
tree3fd70d986496f44de0c2cfc932bcd9c760ba6c15 /t/feed.t
parentc6496a07d159872ad46f8f2f95f3bcb2f0cef13d (diff)
downloadpublic-inbox-c5f0993848ffe4e781015e0b19fadba3f16692b9.tar.gz
One of my dev machines did not have XML::Feed so things were
not tested sufficiently.
Diffstat (limited to 't/feed.t')
-rw-r--r--t/feed.t9
1 files changed, 6 insertions, 3 deletions
diff --git a/t/feed.t b/t/feed.t
index 125490d6..379f8d39 100644
--- a/t/feed.t
+++ b/t/feed.t
@@ -53,7 +53,8 @@ EOF
                         git_dir => $git_dir,
                         max => 3
                 });
-                if ($have_xml_feed) {
+                SKIP: {
+                        skip 'XML::Feed missing', 2 unless $have_xml_feed;
                         my $p = XML::Feed->parse(\$feed);
                         is($p->format, "Atom", "parsed atom feed");
                         is(scalar $p->entries, 3, "parsed three entries");
@@ -90,7 +91,8 @@ EOF
                         git_dir => $git_dir,
                         max => 3
                 });
-                if ($have_xml_feed) {
+                SKIP: {
+                        skip 'XML::Feed missing', 2 unless $have_xml_feed;
                         my $p = XML::Feed->parse(\$spammy_feed);
                         is($p->format, "Atom", "parsed atom feed");
                         is(scalar $p->entries, 3, "parsed three entries");
@@ -115,7 +117,8 @@ EOF
                         git_dir => $git_dir,
                         max => 3
                 });
-                if ($have_xml_feed) {
+                SKIP: {
+                        skip 'XML::Feed missing', 2 unless $have_xml_feed;
                         my $p = XML::Feed->parse(\$feed);
                         is($p->format, "Atom", "parsed atom feed");
                         is(scalar $p->entries, 3, "parsed three entries");