[Catalyst-commits] r7346 - Catalyst-Action-REST/0.60/trunk/lib/Catalyst/Action/Deserialize

[jshirley at dev.catalyst.perl.org]

Author: jshirley
Date: 2008-01-03 23:48:29 +0000 (Thu, 03 Jan 2008)
New Revision: 7346

Modified:
   Catalyst-Action-REST/0.60/trunk/lib/Catalyst/Action/Deserialize/YAML.pm
Log:
Bad fix for YAML::SYck 0.92 breakage.  Yay for backcompat.

Modified: Catalyst-Action-REST/0.60/trunk/lib/Catalyst/Action/Deserialize/YAML.pm
===================================================================
--- Catalyst-Action-REST/0.60/trunk/lib/Catalyst/Action/Deserialize/YAML.pm	2008-01-03 23:22:16 UTC (rev 7345)
+++ Catalyst-Action-REST/0.60/trunk/lib/Catalyst/Action/Deserialize/YAML.pm	2008-01-03 23:48:29 UTC (rev 7346)
@@ -21,7 +21,8 @@
     if ($body) {
         my $rdata;
         eval {
-            $rdata = LoadFile( $c->request->body );
+            my $body = $c->request->body;
+            $rdata = LoadFile( "$body" );
         };
         if ($@) {
             return $@;