Style
Shawn M Moore [Mon, 22 Dec 2008 03:10:10 +0000 (03:10 +0000)]
lib/Mouse/Util/TypeConstraints.pm

index bd71383..b7f39fc 100644 (file)
@@ -71,12 +71,10 @@ my $optimized_constraints_base;
         GlobRef    => sub { ref($_) eq 'GLOB'   },
 
         FileHandle => sub {
-                ref($_) eq 'GLOB'
-                && openhandle($_)
+            ref($_) eq 'GLOB' && openhandle($_)
             or
-                blessed($_)
-                && $_->isa("IO::Handle")
-            },
+            blessed($_) && $_->isa("IO::Handle")
+        },
 
         Object     => sub { blessed($_) && blessed($_) ne 'Regexp' },
     );