[Bast-commits] r6445 - ironman/plagger/lib/Plagger/Plugin/Aggregator

[szbalint at dev.catalyst.perl.org]

Author: szbalint
Date: 2009-05-27 22:44:07 +0000 (Wed, 27 May 2009)
New Revision: 6445

Modified:
   ironman/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm
Log:
Differenciate properly between Atom text, html and xhtml content types.


Modified: ironman/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm
===================================================================
--- ironman/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm	2009-05-27 22:38:29 UTC (rev 6444)
+++ ironman/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm	2009-05-27 22:44:07 UTC (rev 6445)
@@ -196,7 +196,9 @@
         # in Atom, be a little strict with TextConstruct
         # TODO: this actually doesn't work since XML::Feed and XML::Atom does the right
         # thing with Atom 1.0 TextConstruct
-        if ($content->type eq 'text/plain' || $content->type eq 'text') {
+        if (grep { $content->type eq $_ } qw/text html xhtml/) {
+            return Plagger::Text->new(type => $content->type, data => $content->body);
+        } elsif ($content->type eq 'text/plain') {
             return Plagger::Text->new(type => 'text', data => $content->body);
         } else {
             return Plagger::Text->new(type => 'html', data => $content->body);