From: Vincent Pit Date: Mon, 10 Oct 2011 17:48:52 +0000 (+0200) Subject: Trailing whitespace in tests X-Git-Tag: v0.18~3 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=commitdiff_plain;h=9ff004e51589dc6853794e3594262fdec8ea6927 Trailing whitespace in tests --- diff --git a/t/15-reap-multi.t b/t/15-reap-multi.t index 4c41089..3105bed 100644 --- a/t/15-reap-multi.t +++ b/t/15-reap-multi.t @@ -111,7 +111,7 @@ $x = 0; is($x, 0, '1 didn\'t run'); } is($x, 1, '1 ran'); - { + { { { add 2 => UP UP; diff --git a/t/21-localize-level.t b/t/21-localize-level.t index c1dcabc..e51d519 100644 --- a/t/21-localize-level.t +++ b/t/21-localize-level.t @@ -14,7 +14,7 @@ local $Scope::Upper::TestGenerator::call = sub { my ($height, $level, $i) = @_; $level = $level ? 'UP ' x $level : 'HERE'; return [ "localize '\$main::y' => 1 => $level;\n" ]; -}; +}; local $Scope::Upper::TestGenerator::test = sub { my ($height, $level, $i) = @_; diff --git a/t/31-localize_elem-level.t b/t/31-localize_elem-level.t index 790147f..b9c3e6b 100644 --- a/t/31-localize_elem-level.t +++ b/t/31-localize_elem-level.t @@ -43,7 +43,7 @@ local $Scope::Upper::TestGenerator::call = sub { my ($height, $level, $i) = @_; $level = $level ? 'UP ' x $level : 'HERE'; return [ "localize_elem '%main::h', 'a' => 1 => $level;\n" ]; -}; +}; local $Scope::Upper::TestGenerator::test = sub { my ($height, $level, $i) = @_;