diff --git a/ChangeLog b/ChangeLog
index 1a300df8af..ca1eb95833 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Fri May 27 23:56:54 2011  Kouhei Sutou  <kou@cozmixng.org>
+
+	* test/rexml/test_core.rb (Tester::test_text_frozen): split frozen
+	  string test. refs #4783
+
 Fri May 27 22:46:23 2011  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* tool/rbinstall.rb (gem): install gemspec of json.  fixed #4784
diff --git a/test/rexml/test_core.rb b/test/rexml/test_core.rb
index d6d62713f0..e781fe6e25 100644
--- a/test/rexml/test_core.rb
+++ b/test/rexml/test_core.rb
@@ -349,9 +349,6 @@ class Tester < Test::Unit::TestCase
     assert_equal(string, text.to_s)
     text2 = Text.new(text)
     assert_equal(text, text2)
-    string = "Frozen".freeze
-    text3 = Text.new(string)
-    assert_equal(string, text3.to_s)
     #testing substitution
     string = "0 < ( 1 & 1 )"
     correct = "0 &lt; ( 1 &amp; 1 )"
@@ -403,6 +400,12 @@ class Tester < Test::Unit::TestCase
     assert_equal( '<a><b/><c/></a>', doc.to_s )
   end
 
+  def test_text_frozen
+    string = "Frozen".freeze
+    text = Text.new(string)
+    assert_equal(string, text.to_s)
+  end
+
   def test_xmldecl
     source = "<?xml version='1.0'?>"
     # test args