diff --git a/ChangeLog b/ChangeLog
index 81466af75a..76f21221bf 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sat Jan  5 13:18:11 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
+
+	* range.c (range_member): beginning check was
+	  wrong. [ruby-talk:30252]
+
 Fri Jan  4 17:23:49 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
 
 	* misc/ruby-mode.el (ruby-forward-string): forward a string. [new]
diff --git a/range.c b/range.c
index abfebf5032..b18951dcbc 100644
--- a/range.c
+++ b/range.c
@@ -538,7 +538,7 @@ range_member(range, val)
     beg = rb_ivar_get(range, id_beg);
     end = rb_ivar_get(range, id_end);
 
-    if (r_lt(beg, val)) return Qtrue;
+    if (r_gt(beg, val)) return Qfalse;
     if (EXCL(range)) {
 	if (r_lt(val, end)) return Qtrue;
     }