diff --git a/ChangeLog b/ChangeLog
index 92d82d04df..17df13b4ef 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Apr  5 22:25:32 2004  Tanaka Akira  <akr@m17n.org>
+
+	* test/zlib/test_zlib.rb: new file.
+	  (TestZlibGzipWriter#test_new_nil): test for [ruby-dev:23228].
+
 Mon Apr  5 22:16:23 2004  Minero Aoki  <aamine@loveruby.net>
 
 	* parse.y (assoc_list): {a: 1, b: 2} should be allowed.
diff --git a/test/zlib/test_zlib.rb b/test/zlib/test_zlib.rb
new file mode 100644
index 0000000000..b148553be6
--- /dev/null
+++ b/test/zlib/test_zlib.rb
@@ -0,0 +1,16 @@
+require 'test/unit/testsuite'
+require 'test/unit/testcase'
+
+require 'zlib'
+
+class TestZlibGzipWriter < Test::Unit::TestCase
+  def test_new_nil # [ruby-dev:23228]
+    old = $VERBOSE
+    $VERBOSE = nil
+    begin
+      assert_raises(NoMethodError) { Zlib::GzipWriter.new(nil).close }
+    ensure
+      $VERBOSE = old
+    end
+  end
+end