toke.c Add NUL terminator in both branches

By moving the setting of this to after two branches of a conditional
come together, it gets set always, instead of sometimes.

1 files changed, 2 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index 7d3fa47176..ae89bdcc38 100644
--- a/toke.c
+++ b/toke.c
@@ -11362,8 +11362,9 @@ Perl_scan_str(pTHX_ char *start, int keep_bracketed_quoted, int keep_delims, int
         }
 
         Copy(s, open_delim_str, delim_byte_len, char);
-        open_delim_str[delim_byte_len] = '\0';
     }
+    open_delim_str[delim_byte_len] = '\0';  /* Only for safety */
+
 
     /* mark where we are */
     PL_multi_start = CopLINE(PL_curcop);