small optimization - avoid storing an undef

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 3f49f9c7ec8e20b6184cd6a9addb292883136935..85900d2f687f61de4163e18a2cb2fa495b5cb4f4 100644 (file)
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -29389,8 +29389,9 @@ sub convey_batch_to_vertical_aligner {
         # resync_lines_and_tokens for related coding.  Note that
         # '$batch_CODE_type' is the code type of the line to which the ending
         # token belongs.
-        $rvao_args->{Kend} =
-          $batch_CODE_type && $batch_CODE_type ne 'VER' ? undef : $Kend;
+        if ( !$batch_CODE_type || $batch_CODE_type eq 'VER' ) {
+            $rvao_args->{Kend} = $Kend;
+        }
 
         # ---------------------------------------------
         # get the vertical alignment info for this line