[Catalyst-commits] r8682 - trunk/examples/CatalystAdvent/lib/CatalystAdvent/Controller

[jshirley at dev.catalyst.perl.org]

Author: jshirley
Date: 2008-12-01 22:51:31 +0000 (Mon, 01 Dec 2008)
New Revision: 8682

Modified:
   trunk/examples/CatalystAdvent/lib/CatalystAdvent/Controller/Calendar.pm
Log:
Wrapping content in CDATA so the feed isnt busted

Modified: trunk/examples/CatalystAdvent/lib/CatalystAdvent/Controller/Calendar.pm
===================================================================
--- trunk/examples/CatalystAdvent/lib/CatalystAdvent/Controller/Calendar.pm	2008-12-01 22:16:18 UTC (rev 8681)
+++ trunk/examples/CatalystAdvent/lib/CatalystAdvent/Controller/Calendar.pm	2008-12-01 22:51:31 UTC (rev 8682)
@@ -180,9 +180,9 @@
         $parser->parse_from_filehandle($fh);
         close $fh;
         
-        $feed->add_entry(
+        my $e = $feed->add_entry(
             title    => { type => 'text', content => $parser->title },
-            content  => { type => 'xhtml', content => $parser->asString },
+            content  => { type => 'xhtml', content => "<![CDATA[" . $parser->asString . "]]>" },
             author   => { name => $parser->author||'Catalyst', 
 			  email => ($parser->email||
 				    'catalyst at lists.scsys.co.uk') },