Rename test functions init() and check() to init_watcher() and watch()

[perl/modules/Variable-Magic.git] / t / 24-free.t

diff --git a/t/24-free.t b/t/24-free.t
index f66e6db0075f1d5b36a779ff47b96510d5f71ef5..c6daebedacfe59baec1a22bf1c34e79154c98e38 100644 (file)
--- a/t/24-free.t
+++ b/t/24-free.t
@@ -10,17 +10,17 @@ use Variable::Magic qw/cast/;
 use lib 't/lib';
 use Variable::Magic::TestWatcher;
 
-my $wiz = init 'free', 'free';
+my $wiz = init_watcher 'free', 'free';
 
 my $n = int rand 1000;
 
-check {
+watch {
  my $a = $n;
- check { cast $a, $wiz } { }, 'cast';
+ watch { cast $a, $wiz } { }, 'cast';
 } { free => 1 }, 'deletion at the end of the scope';
 
 my $a = $n;
-check { cast $a, $wiz } { }, 'cast 2';
-check { undef $a } { }, 'explicit deletion with undef()';
+watch { cast $a, $wiz } { }, 'cast 2';
+watch { undef $a } { }, 'explicit deletion with undef()';
 
 $Variable::Magic::TestWatcher::mg_end = { free => 1 };