diff options
Diffstat (limited to 'src/test/perl/SimpleTee.pm')
| -rw-r--r-- | src/test/perl/SimpleTee.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/perl/SimpleTee.pm b/src/test/perl/SimpleTee.pm index ea2f2ee8287..9de7b1ac323 100644 --- a/src/test/perl/SimpleTee.pm +++ b/src/test/perl/SimpleTee.pm @@ -13,7 +13,7 @@ use strict; sub TIEHANDLE { my $self = shift; - bless \@_, $self; + return bless \@_, $self; } sub PRINT |