PPI::Dumper fails with strict hashpairs (cperl 5.27)

Fixes Perl-Critic#201
rurban · May 27, 2017 · b676e3f · b676e3f
1 parent 5a2332f
commit b676e3f
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/PPI/Dumper.pm b/lib/PPI/Dumper.pm
@@ -123,7 +123,8 @@ sub new {
 		}, $class;
 
 	# Handle the options
-	my %options = map { lc $_ } @_;
+	my @options = map { lc $_ } @_; # strict hashpairs
+        my %options = @options;
 	foreach ( keys %{$self->{display}} ) {
 		if ( exists $options{$_} ) {
 			if ( $_ eq 'indent' ) {