" . $app . "

X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FYAML%2FHTML.pm;h=32d3fcec16876d45c3e4fe4aae5b69ca41c42471;hb=d0822465cc09629df95ad9c522bce758f2badc8c;hp=4cd14d5d4cd71777e0aa6e4fe48f06be6a4f792c;hpb=a9e5f3d2aa58a89ffd70ec22a5485fdbd4b7a3d6;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize/YAML/HTML.pm b/lib/Catalyst/Action/Serialize/YAML/HTML.pm index 4cd14d5..32d3fce 100644 --- a/lib/Catalyst/Action/Serialize/YAML/HTML.pm +++ b/lib/Catalyst/Action/Serialize/YAML/HTML.pm @@ -7,7 +7,7 @@ extends 'Catalyst::Action'; use YAML::Syck; use URI::Find; -our $VERSION = '0.88'; +our $VERSION = '1.02'; $VERSION = eval $VERSION; sub execute { @@ -23,7 +23,7 @@ sub execute { my $output = ""; $output .= "" . $app . ""; $output .= "

";
-    my $text = Dump($c->stash->{$stash_key});
+    my $text = HTML::Entities::encode(Dump($c->stash->{$stash_key}));
     # Straight from URI::Find
     my $finder = URI::Find->new(
                               sub {
@@ -45,4 +45,6 @@ sub execute {
     return 1;
 }
 
+__PACKAGE__->meta->make_immutable;
+
 1;