fix Cant use string (enable) as an ARRAY ref while strict refs in use bug
This commit is contained in:
parent
a7060e749f
commit
cec6f663f1
@ -832,9 +832,12 @@ sub Zulu2LocalString {
|
||||
|
||||
sub SetPredefinedStartPoints {
|
||||
my $hash = shift;
|
||||
my $a = shift;
|
||||
my $aArg = shift;
|
||||
|
||||
my ( $startpoint_state, $startpoint_num, @morestartpoints ) = @$a;
|
||||
my $startpoint_state = shift @$aArg;
|
||||
my $startpoint_num = shift @$aArg;
|
||||
|
||||
my @morestartpoints = @{$aArg};
|
||||
|
||||
my $name = $hash->{NAME};
|
||||
my $payload;
|
||||
|
Loading…
x
Reference in New Issue
Block a user