From fccc8eb5ef683a6fca9e9979ff592dd846fe44f1 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 23 Jul 2015 14:36:12 +0200 Subject: efa: Do not rely on $opt->{accessibility} being initialized by GetOptions --- bin/efa | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/bin/efa b/bin/efa index bb57893..a7efed6 100755 --- a/bin/efa +++ b/bin/efa @@ -240,6 +240,11 @@ if ( $opt->{accessibility} ) { @{ $opt->{accessibility} } = split( qr{,}, join( q{,}, @{ $opt->{accessibility} } ) ); } +else { + # GetOptions seems to implicitly initialize $opt->{accessibility} to an + # empty arrayref, but it's best not to rely on that. + $opt->{accessibility} = []; +} for my $field ( @{ $opt->{accessibility} } ) { given ($field) { -- cgit v1.2.3