From 44cf56d6e70dbe06a160b004494ba40dd4cfb426 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 22 Jun 2000 08:29:58 +0000
Subject: 2000-06-22

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@775 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 re.c | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 're.c')

diff --git a/re.c b/re.c
index a28ac4a235..a778efca6c 100644
--- a/re.c
+++ b/re.c
@@ -373,7 +373,7 @@ static VALUE
 rb_reg_kcode_m(re)
     VALUE re;
 {
-    char *kcode = "$KCODE";
+    char *kcode;
 
     if (FL_TEST(re, KCODE_FIXED)) {
 	switch (RBASIC(re)->flags & KCODE_MASK) {
@@ -386,11 +386,12 @@ rb_reg_kcode_m(re)
 	  case KCODE_UTF8:
 	    kcode = "utf8"; break;
 	  default:
+	    rb_bug("unknow kcode - should not happen");
 	    break;
 	}
+	return rb_str_new2(kcode);
     }
-
-    return rb_str_new2(kcode);
+    return Qnil;
 }
 
 static Regexp*
-- 
cgit v1.2.3