diff --git a/trunk/ripnews/set/tests/test_intspan.rb b/trunk/ripnews/set/tests/test_intspan.rb
index 8fc870a..b2d075f 100755
--- a/trunk/ripnews/set/tests/test_intspan.rb
+++ b/trunk/ripnews/set/tests/test_intspan.rb
@@ -113,4 +113,14 @@ class TestSetIntspan < Test::Unit::TestCase
 		assert_equal("1-2,5-)", Set::IntSpan.new("1-3,5-)").remove!(3).to_s)
 		assert_equal("(-1,5-)", Set::IntSpan.new("(-1,3,5-)").remove!(3).to_s)
 	end
+
+	def test_member
+		assert_equal(true, Set::IntSpan.new("1-3,5").member?(1))
+		assert_equal(true, Set::IntSpan.new("1-3,5").member?(3))
+		assert_equal(false, Set::IntSpan.new("1-3,5").member?(4))
+		assert_equal(false, Set::IntSpan.new("1-3,5").member?(6))
+		assert_equal(false, Set::IntSpan.new("1-3,5").member?(7))
+		assert_equal(true, Set::IntSpan.new("1-3,5-)").member?(7))
+		assert_equal(true, Set::IntSpan.new("(-3,5").member?(-10))
+	end
 end