diff options
-rwxr-xr-x | bin/efa | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -235,8 +235,10 @@ GetOptions( ) or show_help(1); #>>> -@{ $opt->{accessibility} } - = split( qr{,}, join( q{,}, @{ $opt->{accessibility} } ) ); +if ( $opt->{accessibility} ) { + @{ $opt->{accessibility} } + = split( qr{,}, join( q{,}, @{ $opt->{accessibility} } ) ); +} for my $field ( @{ $opt->{accessibility} } ) { given ($field) { |