From c5f561c7ffb62f108df2a0df05d1b29128a50cd7 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Mon, 11 May 2020 19:05:37 +0100 Subject: [PATCH] probably fix Script erase error --- perl/Script.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/Script.pm b/perl/Script.pm index 1e94ce59..c18de630 100644 --- a/perl/Script.pm +++ b/perl/Script.pm @@ -118,7 +118,7 @@ sub lines sub erase { my $self = shift; - my $call = clean($self->call); + my $call = clean($self->{call}); my $fn; my $try; -- 2.43.0