fix tabs
Jesse Luehrs [Tue, 29 Apr 2014 19:30:33 +0000 (15:30 -0400)]
t/named.t

index 6b78698..7de53b1 100644 (file)
--- a/t/named.t
+++ b/t/named.t
@@ -6,32 +6,32 @@ use warnings;
 use Test::More;
 
 BEGIN {
-       plan skip_all => "Sub::Name required"
-               unless eval { require Sub::Name; 1 };
-       plan tests => 3;
+    plan skip_all => "Sub::Name required"
+        unless eval { require Sub::Name; 1 };
+    plan tests => 3;
 }
 
 use Try::Tiny;
 
 my $name;
 try {
-       $name = (caller(0))[3];
+    $name = (caller(0))[3];
 };
 is $name, "main::try {...} ", "try name"; # note extra space
 
 try {
-       die "Boom";
+    die "Boom";
 } catch {
-       $name = (caller(0))[3];
+    $name = (caller(0))[3];
 };
 is $name, "main::catch {...} ", "catch name"; # note extra space
 
 try {
-       die "Boom";
+    die "Boom";
 } catch {
-       # noop
+    # noop
 } finally {
-       $name = (caller(0))[3];
+    $name = (caller(0))[3];
 };
 is $name, "main::finally {...} ", "finally name"; # note extra space