Changeset 17138

Timestamp:

08/06/08 12:16:28 (5 years ago)

Author:

daisuke

Message:

be more anal about handling enclosures

Files:

• lang/perl/Data-Feed/trunk/lib/Data/Feed/RSS/Entry.pm (modified) (1 diff)

lang/perl/Data-Feed/trunk/lib/Data/Feed/RSS/Entry.pm

@@ -155 +155 @@
     my $self = shift;
 
-    die if @_;
+    { no warnings 'once';
+        confess "Cannot handle enclosures when used with XML::RSS"
+            if $Data::Feed::Parser::RSS::PARSER_CLASS eq 'XML::RSS';
+    }
+
+    { # XXX - We don't support creating enclosures (yet)
+        confess "Cannot handle creation of enclosures (yet)" if @_;
+    }
 
     my @enclosures;