diff options
author | Andinus <andinus@nand.sh> | 2020-06-18 04:38:25 +0530 |
---|---|---|
committer | Andinus <andinus@nand.sh> | 2020-06-18 04:38:25 +0530 |
commit | 81d829b1d2a08e3cfbc996caf3e56ddfc9ab2376 (patch) | |
tree | 8cb2a46a480c4f28721c14b0746ed7ebc709e3d4 | |
parent | 4254fe9296d86dafd5d93b959bc2ff1c612a23e6 (diff) | |
download | ara-81d829b1d2a08e3cfbc996caf3e56ddfc9ab2376.tar.gz |
Use %show instead of @to_show
%show should be used everywhere & @to_show only to create %show.
-rwxr-xr-x | ara.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ara.pl b/ara.pl index 401777b..0bbf062 100755 --- a/ara.pl +++ b/ara.pl @@ -221,7 +221,7 @@ foreach my $i ( 0 ... scalar @$statewise - 1 ) { # If user has asked to show specific states then forget about hide # option. - if ( scalar @to_show ) { + if ( scalar keys %show ) { next unless exists $show{lc $state} or ( length $state > 16 |