From 616bb884dd625b7da34a0e6893981e97c60d9bf4 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Sat, 12 Sep 2020 16:20:36 -0700
Subject: [PATCH] fixed undefined index

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

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 8c1ff4c6..b13c4a5a 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -7204,6 +7204,7 @@ sub tight_paren_follows {
     my $seqno_o = $rLL->[$K_oc]->[_TYPE_SEQUENCE_];
     my $K_io    = $self->[_K_opening_container_]->{$seqno_i};
     my $K_oo    = $self->[_K_opening_container_]->{$seqno_o};
+    return unless ( defined($K_io) && defined($K_oo) );
 
     # RULE 1: Do not break before a closing signature paren
     # (regardless of complexity).  This is a fix for issue git#22.
-- 
2.39.5