fixed undefined index

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 8c1ff4c6707db0a8dc592d0e4410cbad5a01f60f..b13c4a5a9c8543bad503e06efd915244f576d706 100644 (file)
--- 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.