From 3e5e36fe77ed76244061e667cb7289acfb4bd003 Mon Sep 17 00:00:00 2001
From: Gavin Carr <gavin@openfusion.com.au>
Date: Wed, 1 Sep 2010 20:42:28 +0100
Subject: encode/decode to/from json iff content_type is json

---
 lib/Net/Riak/Object.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'lib/Net/Riak/Object.pm')

diff --git a/lib/Net/Riak/Object.pm b/lib/Net/Riak/Object.pm
index c32ea53..0dc6a83 100644
--- a/lib/Net/Riak/Object.pm
+++ b/lib/Net/Riak/Object.pm
@@ -75,7 +75,7 @@ sub store {
         $request->header('link' => $self->_links_to_header);
     }
 
-    if ($self->_jsonize) {
+    if (ref $self->data && $self->content_type eq 'application/json') {
         $request->content(JSON::encode_json($self->data));
     }
     else {
@@ -165,8 +165,9 @@ sub populate {
         $self->siblings(\@siblings);
     }
 
-    if ($status == 200 && $self->_jsonize) {
-        $self->data(JSON::decode_json($self->data));
+    if ($status == 200) {
+        $self->data(JSON::decode_json($self->data))
+            if $self->content_type eq 'application/json';
         $self->vclock($http_response->header('X-Riak-Vclock'));
     }
 }
-- 
cgit 1.4.1