Skip to content
Browse files

Merge branch 'master' of github.com:davorg/xml-feed

  • Loading branch information...
2 parents e933a73 + c91eb47 commit f122708dbb4d8b8d8e173367c7cabcd19f5636cf @davorg committed Apr 5, 2012
Showing with 14 additions and 13 deletions.
  1. +1 −1 Build.PL
  2. +7 −4 README
  3. +1 −1 lib/XML/Feed.pm
  4. +5 −7 t/07-atom10-create.t
View
2 Build.PL
@@ -18,7 +18,7 @@ my $build = Module::Build
'LWP::UserAgent' => 0,
'Module::Pluggable' => 0,
'URI::Fetch' => 0,
- 'XML::Atom' => '0.37',
+ 'XML::Atom' => '0.38',
'XML::LibXML' => '1.66',
'XML::RSS' => '1.47',
'Test::More' => 0,
View
11 README
@@ -22,13 +22,16 @@ is set up, you should just be able to do
% perl -MCPAN -e 'install XML::Feed'
-Download it, unpack it, then build it as per the usual:
+Alternatively, you can download it, unpack it, and then build it like this
+(using Module::Build):
- % perl Makefile.PL
- % make && make test
+ % perl Build.PL
+ % ./Build installdeps
+ % ./Build
+ % ./Build test
Then install it:
- % make install
+ % ./Build install
Six Apart / cpan@sixapart.com
View
2 lib/XML/Feed.pm
@@ -12,7 +12,7 @@ use Module::Pluggable search_path => "XML::Feed::Format",
require => 1,
sub_name => 'formatters';
-our $VERSION = '0.46';
+our $VERSION = '0.48';
our $MULTIPLE_ENCLOSURES = 0;
our @formatters;
BEGIN {
View
12 t/07-atom10-create.t
@@ -1,8 +1,6 @@
use strict;
use Test::More;
-plan tests => 17;
-
use XML::Feed;
use DateTime;
@@ -13,15 +11,15 @@ $feed->title("foo");
$feed->description("Atom 1.0 feed");
$feed->link("http://example.org/");
$feed->id("tag:cpan.org;xml-feed-atom");
-$feed->updated($now);
+$feed->modified($now);
my $entry = XML::Feed::Entry->new('Atom');
$entry->title("1st Entry");
$entry->link("http://example.org/");
$entry->category("blah");
$entry->content("<p>Hello world.</p>");
$entry->id("tag:cpan.org;xml-feed-atom-entry");
-$entry->updated($now);
+$entry->modified($now);
$feed->add_entry($entry);
@@ -37,7 +35,7 @@ is $feed->title, "foo";
is $feed->description, "Atom 1.0 feed";
is $feed->link, "http://example.org/";
is $feed->id, "tag:cpan.org;xml-feed-atom";
-is "".$feed->updated, "".$now;
+is $feed->modified->iso8601, $now->iso8601;
my @entries = $feed->entries;
is @entries, 1;
@@ -50,6 +48,6 @@ is $entry->content->type, 'text/html';
like $entry->content->body, qr!\s*<p>Hello world.</p>\s*!s;
is $entry->id, "tag:cpan.org;xml-feed-atom-entry";
-is "".$entry->updated, "".$now;
-
+is $entry->modified->iso8601, $now->iso8601;
+done_testing();

0 comments on commit f122708

Please sign in to comment.
Something went wrong with that request. Please try again.