From 5d44a216d8a7c27d2608a183fe539f591b71f37b Mon Sep 17 00:00:00 2001
From: eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 29 Sep 2006 03:31:01 +0000
Subject: * jcode.rb (succ!): call original succ! if $KCODE == 'n'.   fixed:
 [ruby-talk:216845]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@11052 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 lib/jcode.rb | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'lib/jcode.rb')

diff --git a/lib/jcode.rb b/lib/jcode.rb
index 8a938254b..78422f296 100644
--- a/lib/jcode.rb
+++ b/lib/jcode.rb
@@ -24,7 +24,6 @@ class String
   RE_UTF8 = Regexp.new(PATTERN_UTF8, 0, 'n')
 
   SUCC = {}
-  SUCC['n'] = Hash.new(1)
   SUCC['s'] = Hash.new(1)
   for i in 0 .. 0x3f
     SUCC['s'][i.chr] = 0x40 - i
@@ -78,7 +77,7 @@ class String
 
   def succ!
     reg = end_regexp
-    if self =~ reg
+    if  $KCODE != 'NONE' && self =~ reg
       succ_table = SUCC[$KCODE[0,1].downcase]
       begin
 	self[-1] += succ_table[self[-1]]
-- 
cgit