Remove one of the two definitions of the a_const contant sub

diff --git a/t/op/smartmatch.t b/t/op/smartmatch.t
index 4e66a1d..0b6ce1a 100644 (file)
--- a/t/op/smartmatch.t
+++ b/t/op/smartmatch.t
@@ -18,8 +18,6 @@ use Tie::Hash;
 my $deep1 = []; push @$deep1, \$deep1;
 my $deep2 = []; push @$deep2, \$deep2;
 
-{my $const = "a constant"; sub a_const () {$const}}
-
 my @nums = (1..10);
 tie my @tied_nums, 'Tie::StdArray';
 @tied_nums =  (1..10);