適当にかきかえ

kentaro · Jan 27, 2012 · 06f3f00 · 06f3f00
1 parent 1ce471a
commit 06f3f00
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/Plack/App/Emacs.pm b/lib/Plack/App/Emacs.pm
@@ -36,8 +36,8 @@ sub call {
     binmode $f, ':utf8';
     my $out = <$f>;
     close $f;
-    $out =~ s/^"(.+)"$/$1/;
-    my $res = $json->decode($out);
+    my $res = $json->decode(eval($out));
+    $res->[1] ||= [];
     $res->[2][0] = encode_utf8 $res->[2][0] if $res;
     $res || [500, ['Content-Type' => 'text/plain'], ['Internal Server Error']];
 }