From 96db5e7f38749b821ac0bca77128fa5890e6ed01 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <gianni.ceccarelli@net-a-porter.com>
Date: Thu, 30 May 2013 07:37:30 +0100
Subject: return json response

---
 lib/WebService/ForecastIo.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib')

diff --git a/lib/WebService/ForecastIo.pm b/lib/WebService/ForecastIo.pm
index a2ef8ec..1761be1 100644
--- a/lib/WebService/ForecastIo.pm
+++ b/lib/WebService/ForecastIo.pm
@@ -97,9 +97,9 @@ sub request {
 
     my $response = $self->user_agent->get($uri);
     if ($response->is_success) {
-        return WebService::ForecastIo::Response->new(
-            $response->decoded_content,
-        );
+        my $json = $response->decoded_content;
+        my $res = WebService::ForecastIo::Response->new($json);
+        return wantarray ? ($res,$json) : $res
     }
     else {
         die $response->status_line
-- 
cgit v1.2.3