diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/overload.t | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/overload.t b/lib/overload.t index 31629c3a8c..12ed55be7c 100644 --- a/lib/overload.t +++ b/lib/overload.t @@ -603,8 +603,7 @@ is($c, "bareword"); } sub TIESCALAR { my $pack = shift; $pack->new(@_) } sub FETCH { shift } - sub nop { } # Around a bug - sub vars { my $p = shift; tie($_, $p), $_->nop foreach @_; } + sub vars { my $p = shift; tie($_, $p) foreach @_; } sub STORE { my $obj = shift; $#$obj = 1; |