From 9a026aec0adf6aaf10a606670ad826f7c50b5654 Mon Sep 17 00:00:00 2001
From: mame <mame@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 3 Mar 2010 17:36:39 +0000
Subject: * test/ruby/test_env.rb (TestEnv#test_select_bang): add tests.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@26810 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog             |  4 ++++
 test/ruby/test_env.rb | 18 ++++++++++++++++++
 2 files changed, 22 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 324c380fbb..f30ac05533 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Thu Mar  4 02:34:59 2010  Yusuke Endoh  <mame@tsg.ne.jp>
+
+	* test/ruby/test_env.rb (TestEnv#test_select_bang): add tests.
+
 Thu Mar  4 02:29:52 2010  Kazuhiro NISHIYAMA  <zn@mbf.nifty.com>
 
 	* test/ruby/test_hash.rb (TestHash#test_keep_if): fix typo.
diff --git a/test/ruby/test_env.rb b/test/ruby/test_env.rb
index 94f978e71c..17c7666e07 100644
--- a/test/ruby/test_env.rb
+++ b/test/ruby/test_env.rb
@@ -175,6 +175,24 @@ class TestEnv < Test::Unit::TestCase
     assert_equal(h1, h2)
   end
 
+  def test_select_bang
+    h1 = {}
+    ENV.each_pair {|k, v| h1[k] = v }
+    ENV["test"] = "foo"
+    ENV.select! {|k, v| IGNORE_CASE ? k.upcase != "TEST" : k != "test" }
+    h2 = {}
+    ENV.each_pair {|k, v| h2[k] = v }
+    assert_equal(h1, h2)
+
+    h1 = {}
+    ENV.each_pair {|k, v| h1[k] = v }
+    ENV["test"] = "foo"
+    ENV.keep_if {|k, v| IGNORE_CASE ? k.upcase != "TEST" : k != "test" }
+    h2 = {}
+    ENV.each_pair {|k, v| h2[k] = v }
+    assert_equal(h1, h2)
+  end
+
   def test_values_at
     ENV["test"] = "foo"
     assert_equal(["foo", "foo"], ENV.values_at("test", "test"))
-- 
cgit v1.2.3