diff options
author | Jesse Luehrs <doy@tozt.net> | 2012-08-19 09:57:45 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2012-08-19 09:57:45 -0500 |
commit | fbeba3e0c7cb53bce4302b4ac206a0f9b169d20f (patch) | |
tree | a45874bdda2f9aee3b6b42febf257d6e13e88167 /t/response-cookie.t | |
parent | 721a07c10b628d163bb3595edddf15e16ce87242 (diff) | |
download | web-request-fbeba3e0c7cb53bce4302b4ac206a0f9b169d20f.tar.gz web-request-fbeba3e0c7cb53bce4302b4ac206a0f9b169d20f.zip |
add sugary constructor
Diffstat (limited to 't/response-cookie.t')
-rw-r--r-- | t/response-cookie.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/response-cookie.t b/t/response-cookie.t index c9d35ee..184723f 100644 --- a/t/response-cookie.t +++ b/t/response-cookie.t @@ -8,7 +8,7 @@ use HTTP::Request::Common; use Web::Response; my $app = sub { - my $res = Web::Response->new(status => 200); + my $res = Web::Response->new([200]); $res->cookies->{t1} = { value => "bar", domain => '.example.com', path => '/cgi-bin' }; $res->cookies->{t2} = { value => "xxx yyy", expires => time + 3600 }; |