From 1aedc237afa0840ad9408d646359d197031d4dff Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 24 Sep 2012 10:14:50 -0500
Subject: don't pass along an undef encoding object

---
 lib/Web/Request.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/Web/Request.pm b/lib/Web/Request.pm
index f889f62..6d3538b 100644
--- a/lib/Web/Request.pm
+++ b/lib/Web/Request.pm
@@ -422,7 +422,8 @@ sub new_response {
 
     Class::Load::load_class($self->response_class);
     my $res = $self->response_class->new(@_);
-    $res->_encoding_obj($self->_encoding_obj);
+    $res->_encoding_obj($self->_encoding_obj)
+        if $self->has_encoding;
     return $res;
 }
 
-- 
cgit v1.2.3-54-g00ecf