my($str) = @_;
$feed->init_empty;
if ($str) {
- $feed->{rss}->parse($$str);
+ $feed->{rss}->parse($$str, { hashrefs_instead_of_strings => 1 } );
}
$feed;
}
}
}
+sub enclosure {
+ my $entry = shift;
+
+ if (@_) {
+ my $enclosure = shift;
+ $entry->{entry}->{enclosure} = {
+ url => $enclosure->{url},
+ type => $enclosure->{type},
+ length => $enclosure->{length}
+ };
+ } else {
+ return XML::Feed::Enclosure->new($entry->{entry}->{enclosure});
+ }
+}
1;