From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Fri, 9 Feb 2024 01:35:11 +0000 (-0800)
Subject: fix spacing when deleting arrows
X-Git-Tag: 20240202.01~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=043c57112c2681e6ee934eafecc87b3c29c8860b;p=perltidy.git

fix spacing when deleting arrows
---

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 42d3f20e..2867fd85 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -11109,6 +11109,7 @@ sub respace_tokens_inner_loop {
                     }
                     else {
                         $self->delete_interbracket_arrow();
+                        $rwhitespace_flags->[$KK] = WS_NO;
                     }
                 }
             }