Detabardize - standardize code/tests on 2-space indent

[p5sagit/Try-Tiny.git] / t / given_when.t

diff --git a/t/given_when.t b/t/given_when.t
index dce86bb..4ae9baa 100644 (file)
--- a/t/given_when.t
+++ b/t/given_when.t
@@ -6,9 +6,9 @@ use warnings;
 use Test::More;
 
 BEGIN {
-    plan skip_all => "Perl 5.10 is required" unless eval { require 5.010 };
-    plan tests => 3;
-    use_ok("Try::Tiny");
+  plan skip_all => "Perl 5.10 is required" unless eval { require 5.010 };
+  plan tests => 3;
+  use_ok("Try::Tiny");
 }
 
 use 5.010;
@@ -16,21 +16,21 @@ use 5.010;
 my ( $error, $topic );
 
 given ("foo") {
-    when (qr/./) {
-        try {
-            die "blah\n";
-        } catch {
-            $topic = $_;
-            $error = $_[0];
-        }
-    };
+  when (qr/./) {
+    try {
+      die "blah\n";
+    } catch {
+      $topic = $_;
+      $error = $_[0];
+    }
+  };
 }
 
 is( $error, "blah\n", "error caught" );
 
 {
-    local $TODO = "perhaps a workaround can be found";
-    is( $topic, $error, 'error is also in $_' );
+  local $TODO = "perhaps a workaround can be found";
+  is( $topic, $error, 'error is also in $_' );
 }
 
 # ex: set sw=4 et: