From c75f6e78f2f92de70cd3e962038478a8e6f3da85 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Mon, 4 Jan 2021 08:04:45 -0800
Subject: [PATCH] added missing return stmt; reformat

---
 lib/Perl/Tidy/Formatter.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 404720a0..be18a168 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -7830,6 +7830,8 @@ EOM
     $self->[_rKrange_multiline_qw_by_seqno_] = $rKrange_multiline_qw_by_seqno;
     $self->[_rcontains_multiline_qw_by_seqno_] =
       $rcontains_multiline_qw_by_seqno;
+
+    return;
 }
 
 ######################################
@@ -15447,7 +15449,7 @@ sub find_token_starting_list {
 
                 if ( $number_of_fields_best != 1 ) {
                     my $spaces_wanted_2 =
-                      1 + $pair_width - $columns;             # for 2 fields
+                      1 + $pair_width - $columns;    # for 2 fields
                     if ( $available_spaces > $spaces_wanted_2 ) {
                         $spaces_wanted = $spaces_wanted_2;
                     }
-- 
2.39.5