2 files changed, 0 insertions, 3 deletions
diff --git a/pp_hot.c b/pp_hot.c
index c9aa778fac..59ff881a93 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2230,7 +2230,6 @@ PP(pp_subst)
 	}
 	d = s;
 	PL_curpm = pm;
-	SvSCREAM_off(TARG);	/* disable possible screamer */
 	if (once) {
 	    if (RX_MATCH_TAINTED(rx)) /* run time pattern taint, eg locale */
 		rxtainted |= SUBST_TAINT_PAT;
diff --git a/sv.c b/sv.c
index 6929e545d7..56f4407e4e 100644
--- a/sv.c
+++ b/sv.c
@@ -7621,8 +7621,6 @@ Perl_sv_gets(pTHX_ register SV *const sv, register PerlIO *const fp, I32 append)
        Swings and roundabouts.  */
     SvUPGRADE(sv, SVt_PV);
 
-    SvSCREAM_off(sv);
-
     if (append) {
 	if (PerlIO_isutf8(fp)) {
 	    if (!SvUTF8(sv)) {