diff --git a/ChangeLog b/ChangeLog
index 42b4f235a2..2a84d6b4c3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Apr  6 16:06:30 2005  Hirokazu Yamamoto  <ocean@m2.ccsnet.ne.jp>
+
+	* test/ruby/test_env.rb (test_key): should test ENV.key instead of
+	  ENV.index. [ruby-dev:25994]
+
 Tue Apr  5 16:01:12 2005  Kouhei Sutou  <kou@cozmixng.org>
 
 	* lib/rss/*: refactored.
diff --git a/test/ruby/test_env.rb b/test/ruby/test_env.rb
index edc7dcaf61..f0f36878da 100644
--- a/test/ruby/test_env.rb
+++ b/test/ruby/test_env.rb
@@ -59,26 +59,26 @@ class TestEnv < Test::Unit::TestCase
     assert_equal(true, ENV.has_value?(val.upcase))
   end
 
-  def test_index
+  def test_key
     val = 'a'
     val.succ! while ENV.has_value?(val) && ENV.has_value?(val.upcase)
     ENV['test'] = val[0...-1]
 
-    assert_nil(ENV.index(val))
-    assert_nil(ENV.index(val.upcase))
+    assert_nil(ENV.key(val))
+    assert_nil(ENV.key(val.upcase))
     ENV['test'] = val
     if IGNORE_CASE
-      assert_equal('TEST', ENV.index(val).upcase)
+      assert_equal('TEST', ENV.key(val).upcase)
     else
-      assert_equal('test', ENV.index(val))
+      assert_equal('test', ENV.key(val))
     end
-    assert_nil(ENV.index(val.upcase))
+    assert_nil(ENV.key(val.upcase))
     ENV['test'] = val.upcase
-    assert_nil(ENV.index(val))
+    assert_nil(ENV.key(val))
     if IGNORE_CASE
-      assert_equal('TEST', ENV.index(val.upcase).upcase)
+      assert_equal('TEST', ENV.key(val.upcase).upcase)
     else
-      assert_equal('test', ENV.index(val.upcase))
+      assert_equal('test', ENV.key(val.upcase))
     end
   end
 end