/[XML-Feed]/t/05-atom10-link.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /t/05-atom10-link.t

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1 - (show annotations)
Sun Mar 16 19:47:49 2008 UTC (16 years ago) by dpavlin
File MIME type: application/x-troff
File size: 286 byte(s)
import XML::Feed 0.12 from CPAN

1 use strict;
2 use XML::Feed;
3
4 use Test::More;
5 plan tests => 3;
6
7 my $feed = XML::Feed->parse("t/samples/atom-10-example.xml");
8 is $feed->title, 'Example Feed';
9 is $feed->link, 'http://example.org/', "link without rel";
10
11 my $e = ($feed->entries)[0];
12 ok $e->link, 'entry link without rel';
13

  ViewVC Help
Powered by ViewVC 1.1.26