From: Dave Rolsky Date: Sat, 14 Feb 2009 23:53:50 +0000 (+0000) Subject: Fix some bizarro code formatting X-Git-Tag: 0.71~21 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1a2cafeee55b6f14526aaef8537231e751108e16;p=gitmo%2FMoose.git Fix some bizarro code formatting --- diff --git a/t/040_type_constraints/002_util_type_constraints_export.t b/t/040_type_constraints/002_util_type_constraints_export.t index cbab89c..85faf6b 100644 --- a/t/040_type_constraints/002_util_type_constraints_export.t +++ b/t/040_type_constraints/002_util_type_constraints_export.t @@ -7,26 +7,25 @@ use Test::More tests => 5; use Test::Exception; BEGIN { - use_ok('Moose::Util::TypeConstraints', { into => 'Foo' } ); + use_ok( 'Moose::Util::TypeConstraints', { into => 'Foo' } ); } { + package Foo; - eval { - type MyRef => where { ref($_) }; - }; - ::ok(!$@, '... successfully exported &type to Foo package'); - - eval { - subtype MyArrayRef - => as MyRef - => where { ref($_) eq 'ARRAY' }; - }; - ::ok(!$@, '... successfully exported &subtype to Foo package'); - - Moose::Util::TypeConstraints->export_type_constraints_as_functions(); - - ::ok(MyRef({}), '... Ref worked correctly'); - ::ok(MyArrayRef([]), '... ArrayRef worked correctly'); -} \ No newline at end of file + eval { + type MyRef => where { ref($_) }; + }; + ::ok( !$@, '... successfully exported &type to Foo package' ); + + eval { + subtype MyArrayRef => as MyRef => where { ref($_) eq 'ARRAY' }; + }; + ::ok( !$@, '... successfully exported &subtype to Foo package' ); + + Moose::Util::TypeConstraints->export_type_constraints_as_functions(); + + ::ok( MyRef( {} ), '... Ref worked correctly' ); + ::ok( MyArrayRef( [] ), '... ArrayRef worked correctly' ); +}