]> git.vpit.fr Git - perl/modules/Variable-Temp.git/blobdiff - t/10-lexical.t
Use set_temp() in tests instead of temp()
[perl/modules/Variable-Temp.git] / t / 10-lexical.t
index 41bbf45c7c2d936946afd400e3d4a73e63fb3e4d..8fc07fab9bd97b824b4b6c6ccff7b8b2f6a3731b 100644 (file)
@@ -3,21 +3,21 @@
 use strict;
 use warnings;
 
-use Variable::Temp 'temp';
+use Variable::Temp 'set_temp';
 
 use Test::More tests => 7;
 
 my $x = 1;
 is $x, 1;
 {
temp $x = 2;
set_temp $x => 2;
  is $x, 2;
  $x = 3;
  is $x, 3;
  {
-  temp $x = 4;
+  set_temp $x => 4;
   is $x, 4;
-  temp $x = 5;
+  set_temp $x => 5;
   is $x, 5;
  }
  is $x, 3;