From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 29 Dec 2004 21:04:43 +0000 (+0000)
Subject: Ooops. Fix unitialised variable
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9b9d7ce8d832b4fbcb890a8f326b7b630d9396fa;p=p5sagit%2Fp5-mst-13.2.git

Ooops. Fix unitialised variable

p4raw-id: //depot/perl@23705
---

diff --git a/pp_sys.c b/pp_sys.c
index edb69c2..356f6f2 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1604,6 +1604,7 @@ PP(pp_sysread)
 	buffer = SvPVutf8_force(bufsv, blen);
 	/* UTF-8 may not have been set if they are all low bytes */
 	SvUTF8_on(bufsv);
+	buffer_utf8 = 0;
     }
     else {
 	buffer = SvPV_force(bufsv, blen);