From: Stevan Little Date: Sun, 19 Mar 2006 19:48:16 +0000 (+0000) Subject: uploadin X-Git-Tag: 0_05~87 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b509f553f353945922688ba66633e23a8d250c87;p=gitmo%2FMoose.git uploadin --- diff --git a/t/005_basic.t b/t/005_basic.t index 3695fac..8ffb6b8 100644 --- a/t/005_basic.t +++ b/t/005_basic.t @@ -18,6 +18,12 @@ BEGIN { use warnings; use Moose; + coerce 'HTTPHeader' + => as ArrayRef + => to { HTTPHeader->new(array => $_[0]) } + => as HashRef + => to { HTTPHeader->new(hash => $_[0]) }; + has 'array' => (is => 'ro'); has 'hash' => (is => 'ro'); @@ -26,12 +32,6 @@ BEGIN { use warnings; use Moose; - coerce 'HTTPHeader' - => as ArrayRef - => to { HTTPHeader->new(array => $_[0]) } - => as HashRef - => to { HTTPHeader->new(hash => $_[0]) }; - has 'header' => (is => 'rw', isa => 'HTTPHeader', coerce => 1); }