Clean up

[catagits/XML-Feed.git] / t / 12-multi-categories.base

diff --git a/t/12-multi-categories.base b/t/12-multi-categories.base
deleted file mode 100644 (file)
index e63b31c..0000000
--- a/t/12-multi-categories.base
+++ /dev/null
@@ -1,26 +0,0 @@
-use strict;
-use Test::More tests => 6;
-use XML::Feed;
-
-$field ||= "categories";
-ok(my $feed = XML::Feed->parse("t/samples/${type}-multiple-${field}.xml"), "Parsed $type file with multiple categories");
-my ($entry) = $feed->entries;
-
-is_deeply(
-        [$entry->category()],
-        ["foo", "bar", "quux", "simon's tags"],        
-"Got all categories");
-
-my $xml = $feed->as_xml;
-ok($feed = XML::Feed->parse(\$xml), "Reparsed $type from string");
-is_deeply(
-        [$entry->category()],
-        ["foo", "bar", "quux", "simon's tags"],        
-"Got all categories again");
-
-ok($entry->category("quirka fleeg"), "Added a category");
-is_deeply(
-        [$entry->category()],
-        ["foo", "bar", "quux", "simon's tags", "quirka fleeg"],        
-"Got new category");
-