Changeset 732

Timestamp:

05/13/06 07:13:25

Author:

miyagawa

Message:

• Support enclosure creation in XML::Feed and Publish::Feed
  
• Added Gosuke Miyashita as author of Publish::Feed thanks to his Publish::PodCast?
  
• Added $entry->has_enclosure method
  

Files:

• trunk/plagger/lib/Plagger/Entry.pm (modified) (1 diff)
• trunk/plagger/lib/Plagger/Plugin/Publish/Feed.pm (modified) (3 diffs)

trunk/plagger/lib/Plagger/Entry.pm

@@ -85 +85 @@
-}
-
+sub has_enclosure {
+    my $self = shift;
+    scalar @{$self->{enclosures}} > 0;
+}
+
-1;
-

trunk/plagger/lib/Plagger/Plugin/Publish/Feed.pm

@@ -58 +58 @@
-        $entry->issued($e->date) if $e->date;
-        $entry->author($e->author);
+
+        # RSS 2.0 by spec doesn't allow multiple enclosures
+        if ($e->has_enclosure) {
+            my @enclosures = $feed_format eq 'RSS' ? ($e->enclosures->[0]) : $e->enclosures;
+            for my $enclosure (@enclosures) {
+                $entry->add_enclosure({
+                    url    => $enclosure->url,
+                    length => $enclosure->length,
+                    type   => $enclosure->type,
+                });
+            }
+        }
+
-        $feed->add_entry($entry);
-    }
@@ -100 +113 @@
-}
-
+# XXX okay, this is a hack until XML::Feed is updated
+*XML::Feed::Entry::Atom::add_enclosure = sub {
+    my($entry, $enclosure) = @_;
+    my $link = XML::Atom::Link->new;
+    $link->rel('enclosure');
+    $link->type($enclosure->{type});
+    $link->href($enclosure->{url});
+    $link->length($enclosure->{length});
+    $entry->{entry}->add_link($link);
+};
+
+*XML::Feed::Entry::RSS::add_enclosure = sub {
+    my($entry, $enclosure) = @_;
+    $entry->{entry}->{enclosure} = {
+        url    => $enclosure->{url},
+        type   => $enclosure->{type},
+        length => $enclosure->{length},
+    };
+};
+
+
-1;
-
@@ -157 +191 @@
-Yoshiki KURIHARA
-
+Tatsuhiko Miyagawa
+
+Gosuke Miyashita
+
-=head1 SEE ALSO
-