From 8ec9fc106ce6d45deffc2a20093b7870e406dbf4 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 5 Mar 2009 01:24:57 +0000
Subject: * string.c (rb_str_chomp_bang): keeps 7bit coderange.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@22774 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 string.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'string.c')

diff --git a/string.c b/string.c
index 3166f595e..e94f56399 100644
--- a/string.c
+++ b/string.c
@@ -6056,7 +6056,10 @@ rb_str_chomp_bang(int argc, VALUE *argv, VALUE str)
 	 memcmp(RSTRING_PTR(rs), pp, rslen) == 0)) {
 	if (rb_enc_left_char_head(p, pp, e, enc) != pp)
 	    return Qnil;
-	rb_str_modify(str);
+	str_modify_keep_cr(str);
+	if (ENC_CODERANGE(str) != ENC_CODERANGE_7BIT) {
+	    ENC_CODERANGE_CLEAR(str);
+	}
 	STR_SET_LEN(str, RSTRING_LEN(str) - rslen);
 	RSTRING_PTR(str)[RSTRING_LEN(str)] = '\0';
 	return str;
-- 
cgit