X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FXML%2FFeed%2FFormat%2FRSS.pm;h=e29123cfe71668eb69fb7c1f4b626e6d2a82f85d;hb=3bdbab6fcf5086f1c29abfcd02346686719d0233;hp=5494c0bc3ff7f4f61ddd52420571538e12497f33;hpb=4ad13011b5d49c3a2f38cbf9e625208d627be405;p=catagits%2FXML-Feed.git

diff --git a/lib/XML/Feed/Format/RSS.pm b/lib/XML/Feed/Format/RSS.pm
index 5494c0b..e29123c 100644
--- a/lib/XML/Feed/Format/RSS.pm
+++ b/lib/XML/Feed/Format/RSS.pm
@@ -142,6 +142,7 @@ sub entries {
     my @entries;
     for my $item (@{ $rss->{items} }) {
         push @entries, XML::Feed::Entry::Format::RSS->wrap($item);
+		$entries[-1]->{_version} = $rss->{'version'};		
     }
     @entries;
 }
@@ -158,6 +159,8 @@ sub as_xml { $_[0]->{rss}->as_string }
 package XML::Feed::Entry::Format::RSS;
 use strict;
 
+sub format { 'RSS ' . $_[0]->{'_version'} }
+
 use XML::Feed::Content;
 
 use base qw( XML::Feed::Entry );