[Moose-commits] r7153 - in Mouse/trunk: . lib/Mouse/Util

[sartak at code2.0beta.co.uk]

Author: sartak
Date: 2008-12-21 19:10:10 -0800 (Sun, 21 Dec 2008)
New Revision: 7153

Modified:
   Mouse/trunk/
   Mouse/trunk/lib/Mouse/Util/TypeConstraints.pm
Log:
 r77753 at onn:  sartak | 2008-12-21 22:10:03 -0500
 Style



Property changes on: Mouse/trunk
___________________________________________________________________
Name: svk:merge
   - 08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse:77751
08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse-trunk:61565
3efe9002-19ed-0310-8735-a98156148065:/Mouse/branches/shika-based:6997
   + 08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse:77753
08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse-trunk:61565
3efe9002-19ed-0310-8735-a98156148065:/Mouse/branches/shika-based:6997

Modified: Mouse/trunk/lib/Mouse/Util/TypeConstraints.pm
===================================================================
--- Mouse/trunk/lib/Mouse/Util/TypeConstraints.pm	2008-12-22 03:09:16 UTC (rev 7152)
+++ Mouse/trunk/lib/Mouse/Util/TypeConstraints.pm	2008-12-22 03:10:10 UTC (rev 7153)
@@ -71,12 +71,10 @@
         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' },
     );