Tidy this method
Dave Rolsky [Wed, 6 Aug 2008 19:06:22 +0000 (19:06 +0000)]
lib/Moose/Exporter.pm

index 2fad886..9c33377 100644 (file)
@@ -8,16 +8,16 @@ use namespace::clean 0.08 ();
 use Sub::Exporter;
 
 
-sub get_caller{
-    # 1 extra level because it's called by import so there's a layer of indirection
+sub get_caller {
+    # 1 extra level because it's called by import so there's a layer
+    # of indirection
     my $offset = 1;
 
     return
-        (ref $_[1] && defined $_[1]->{into})
-            ? $_[1]->{into}
-                : (ref $_[1] && defined $_[1]->{into_level})
-                    ? caller($offset + $_[1]->{into_level})
-                    : caller($offset);
+          ( ref $_[1] && defined $_[1]->{into} ) ? $_[1]->{into}
+        : ( ref $_[1] && defined $_[1]->{into_level} )
+        ? caller( $offset + $_[1]->{into_level} )
+        : caller($offset);
 }
 
 my %EXPORT_SPEC;