Subject: | new in XML::Feed::Entry bless using incorrect package |
my $format_class = 'XML::Feed::Format::' . $format;
eval "use $format_class";
Carp::croak("Unsupported format $format: $@") if $@;
my $entry = bless {}, join('::', __PACKAGE__, "Format", $format);
construction next to bless result in XML::Feed::Entry::Format::Atom that is incorrect. Replacing it
with $format_class will fix issue.
--
Best regards, Ruslan.