remove trailing whitespace
[gitmo/Moose.git] / t / 020_attributes / 014_misc_attribute_coerce_lazy.t
index 37e354d..5a47246 100644 (file)
@@ -3,42 +3,40 @@
 use strict;
 use warnings;
 
-use Test::More tests => 3;
+use Test::More tests => 2;
 use Test::Exception;
 
-BEGIN {
-       use_ok('Moose');
-}
+
 
 {
     package HTTPHeader;
     use Moose;
-    
+
     has 'array' => (is => 'ro');
-    has 'hash'  => (is => 'ro');    
+    has 'hash'  => (is => 'ro');
 }
 
 {
     package Request;
     use Moose;
     use Moose::Util::TypeConstraints;
-    subtype Header => 
-        => as Object 
+
+    subtype Header =>
+        => as Object
         => where { $_->isa('HTTPHeader') };
 
-    coerce Header 
-        => from ArrayRef 
+    coerce Header
+        => from ArrayRef
             => via { HTTPHeader->new(array => $_[0]) }
-        => from HashRef 
-            => via { HTTPHeader->new(hash => $_[0]) }; 
-    
+        => from HashRef
+            => via { HTTPHeader->new(hash => $_[0]) };
+
     has 'headers'  => (
            is      => 'rw',
            isa     => 'Header',
            coerce  => 1,
            lazy    => 1,
-           default => sub { [ 'content-type', 'text/html' ] } 
+           default => sub { [ 'content-type', 'text/html' ] }
     );
 }