Fix change 25045

p4raw-id: //depot/perl@25062

diff --git a/mg.c b/mg.c
index 6d82070..086ab9a 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -2217,6 +2217,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
     case '\011':       /* ^I */ /* NOT \t in EBCDIC */
        Safefree(PL_inplace);
        PL_inplace = SvOK(sv) ? savesvpv(sv) : Nullch;
+       break;
     case '\017':       /* ^O */
        if (*(mg->mg_ptr+1) == '\0') {
            Safefree(PL_osname);