autotest: remove unused boxname parameter from printbox()

This commit is contained in:
Oswald Buddenhagen 2020-12-18 14:33:26 +01:00
parent 9fbf5c2f6c
commit 6e56f39fa9

View File

@ -417,7 +417,7 @@ sub showbox($)
for my $uid (sort { $a <=> $b } keys %$ms) { for my $uid (sort { $a <=> $b } keys %$ms) {
push @bc, $$ms{$uid}[0], $uid, $$ms{$uid}[1]; push @bc, $$ms{$uid}[0], $uid, $$ms{$uid}[1];
} }
printbox($bn, \@bc); printbox(\@bc);
} }
# $filename # $filename
@ -632,10 +632,10 @@ sub ckchan($$)
return $rslt; return $rslt;
} }
# $box_name, \@box_state # \@box_state
sub printbox($$) sub printbox($)
{ {
my ($bn, $bs) = @_; my ($bs) = @_;
print " [ $$bs[0],\n "; print " [ $$bs[0],\n ";
my $frst = 1; my $frst = 1;
@ -673,8 +673,8 @@ sub printchan($)
{ {
my ($cs) = @_; my ($cs) = @_;
printbox("far", $$cs[0]); printbox($$cs[0]);
printbox("near", $$cs[1]); printbox($$cs[1]);
printstate($$cs[2]); printstate($$cs[2]);
} }