From: Vincent Pit Date: Mon, 16 Mar 2015 15:01:36 +0000 (-0300) Subject: Rename the global variable in t/10-base.t X-Git-Tag: v0.02~7 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FVariable-Temp.git;a=commitdiff_plain;h=82a9214ead460768b5f3d77ea1f58badafc7b00c Rename the global variable in t/10-base.t --- diff --git a/t/10-base.t b/t/10-base.t index 57ea47f..d203f22 100644 --- a/t/10-base.t +++ b/t/10-base.t @@ -24,36 +24,36 @@ is $x, 1; } is $x, 1; -our $y = 1; -is $y, 1; +our $X = 1; +is $X, 1; { - set_temp $y => 2; - is $y, 2; - $y = 3; - is $y, 3; + set_temp $X => 2; + is $X, 2; + $X = 3; + is $X, 3; { - set_temp $y => 4; - is $y, 4; - set_temp $y => 5; - is $y, 5; + set_temp $X => 4; + is $X, 4; + set_temp $X => 5; + is $X, 5; } - is $y, 3; + is $X, 3; { - local $y = 6; - is $y, 6; + local $X = 6; + is $X, 6; } - is $y, 3; + is $X, 3; { - local $y = 7; - set_temp $y => 8; - is $y, 8; + local $X = 7; + set_temp $X => 8; + is $X, 8; } - is $y, 3; + is $X, 3; { - set_temp $y => 9; - local $y = 10; - is $y, 10; + set_temp $X => 9; + local $X = 10; + is $X, 10; } - is $y, 3; + is $X, 3; } -is $y, 1; +is $X, 1;