]> git.vpit.fr Git - perl/modules/Variable-Temp.git/blobdiff - t/10-lexical.t
Merge t/10-lexical.t and t/11-global.t into t/10-base.t
[perl/modules/Variable-Temp.git] / t / 10-lexical.t
diff --git a/t/10-lexical.t b/t/10-lexical.t
deleted file mode 100644 (file)
index 8fc07fa..0000000
+++ /dev/null
@@ -1,25 +0,0 @@
-#!perl -T
-
-use strict;
-use warnings;
-
-use Variable::Temp 'set_temp';
-
-use Test::More tests => 7;
-
-my $x = 1;
-is $x, 1;
-{
- set_temp $x => 2;
- is $x, 2;
- $x = 3;
- is $x, 3;
- {
-  set_temp $x => 4;
-  is $x, 4;
-  set_temp $x => 5;
-  is $x, 5;
- }
- is $x, 3;
-}
-is $x, 1;