From dffc6b060fe777a46a14bbd564c878a37f7ec672 Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Wed, 5 Dec 2018 22:15:30 -0800 Subject: [PATCH] fixed error in variable name --- lib/Perl/Tidy/Formatter.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm index 803e1802..ecda7046 100644 --- a/lib/Perl/Tidy/Formatter.pm +++ b/lib/Perl/Tidy/Formatter.pm @@ -5848,8 +5848,8 @@ sub make_keyword_group_list_pattern { # turn any input list into a regex for recognizing selected block types. # Here are the defaults: $keyword_group_list_pattern = '^((our|local|my|use|require|)$|sub)'; - if ( defined( $rOpts->{'keyword-group-list'} ) - && $rOpts->{'keyword-group-list'} ) + if ( defined( $rOpts->{'keyword-group-blanks-list'} ) + && $rOpts->{'keyword-group-blanks-list'} ) { $keyword_group_list_pattern = make_block_pattern( '-kgbl', $rOpts->{'keyword-group-list'} ); -- 2.39.5