From: Simon Wistow <simon@thegestalt.org>
Date: Wed, 1 Oct 2008 00:16:42 +0000 (+0000)
Subject: Fix encoding problems
X-Git-Tag: v0.20~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ccc9fe4cf9bb12b9229d8dad8926cb0ed610908e;p=catagits%2FXML-Feed.git

Fix encoding problems
---

diff --git a/lib/XML/Feed/Atom.pm b/lib/XML/Feed/Atom.pm
index 9285e63..973a287 100644
--- a/lib/XML/Feed/Atom.pm
+++ b/lib/XML/Feed/Atom.pm
@@ -133,7 +133,7 @@ sub content {
     if (@_) {
         my %param;
         if (ref($_[0]) eq 'XML::Feed::Content') {
-            %param = (Body => $_[0]->body);
+            %param = (Body => $_[0]->body, Type => ($_[0]->type eq 'text/html')? 'html' : 'text');
         } else {
             %param = (Body => $_[0]);
         }