From 5196852401ff4d4dbc285076b319ec9a610c1edf Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sun, 17 Apr 2022 17:58:09 -0700
Subject: [PATCH] minor correction to recent coding change

---
 lib/Perl/Tidy/Formatter.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 4ea7174a..3ef2d117 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -22877,7 +22877,7 @@ EOM
                         # make () align with qw in a 'use' statement (git #93)
                         if (   $tokens_to_go[0] eq 'use'
                             && $types_to_go[0] eq 'k'
-                            && $inext_to_go[$i] == $i + 1 )
+                            && $mate_index_to_go[$i] == $i + 1 )
                         {
                             $alignment_type = 'q';
                         }
-- 
2.39.5