From c5f0993848ffe4e781015e0b19fadba3f16692b9 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Mon, 21 Apr 2014 20:39:54 +0000 Subject: t/feed: notify user of missing XML::Feed One of my dev machines did not have XML::Feed so things were not tested sufficiently. --- t/feed.t | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 't/feed.t') 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"); -- cgit v1.2.3-24-ge0c7