From a2986198eb809d38bd99e7c56cd80e27ff6394f0 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Wed, 18 Jul 2012 16:43:46 -0500
Subject: couple more bugs

---
 lib/Web/Request/Types.pm | 2 +-
 lib/Web/Response.pm      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/Web/Request/Types.pm b/lib/Web/Request/Types.pm
index 14c99e3..951b875 100644
--- a/lib/Web/Request/Types.pm
+++ b/lib/Web/Request/Types.pm
@@ -17,7 +17,7 @@ subtype 'Web::Request::Types::StringLike',
 duck_type 'Web::Request::Types::PSGIBodyObject' => ['getline', 'close'];
 
 subtype 'Web::Request::Types::PSGIBody',
-    as 'ArrayRef[Str]|FileHandle|Web::Request::Types::PSGIBodyObject';
+    as 'ArrayRef[Str|Web::Request::Types::StringLike]|FileHandle|Web::Request::Types::PSGIBodyObject';
 
 subtype 'Web::Request::Types::HTTPStatus',
     as 'Int',
diff --git a/lib/Web/Response.pm b/lib/Web/Response.pm
index ea74585..79b2616 100644
--- a/lib/Web/Response.pm
+++ b/lib/Web/Response.pm
@@ -81,7 +81,7 @@ sub _finalize_cookies {
     my $cookies = $self->cookies;
     for my $name (keys %$cookies) {
         $self->headers->push_header(
-            'Set-Cookie' => $self->_bake_cookie($name, $cookies->{name}),
+            'Set-Cookie' => $self->_bake_cookie($name, $cookies->{$name}),
         );
     }
 
-- 
cgit v1.2.3-54-g00ecf