X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F02-create.t;h=776565c17f7e27d45d3d36def4ee541e5e4678a7;hb=266eef5cdbe2ca7d18ca8549710b1c20eb044f13;hp=5070154674ec7a0c2c74ebdfdcdbc549e60c8f8d;hpb=9a36f82c8786ab4cc113947fc8801a31718b3d80;p=catagits%2FXML-Feed.git diff --git a/t/02-create.t b/t/02-create.t index 5070154..776565c 100644 --- a/t/02-create.t +++ b/t/02-create.t @@ -9,7 +9,7 @@ use DateTime; for my $format (qw( Atom RSS )) { my $feed = XML::Feed->new($format); - isa_ok($feed, 'XML::Feed::' . $format); + isa_ok($feed, 'XML::Feed::Format::' . $format); like($feed->format, qr/^$format/, 'Format is correct'); $feed->title('My Feed'); is($feed->title, 'My Feed', 'feed title is correct'); @@ -35,7 +35,7 @@ for my $format (qw( Atom RSS )) { ok($feed->as_xml, 'as_xml returns something'); my $entry = XML::Feed::Entry->new($format); - isa_ok($entry, 'XML::Feed::Entry::' . $format); + isa_ok($entry, 'XML::Feed::Entry::Format::' . $format); $entry->title('Foo Bar'); is($entry->title, 'Foo Bar', 'entry title is correct'); $entry->link('http://www.example.com/foo/bar.html');