diff --git a/ChangeLog b/ChangeLog
index a4a2a31cc0..bb105f291a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sat Nov 20 23:25:12 2004  Minero Aoki  <aamine@loveruby.net>
+
+	* io.c (rb_io_getline): f.gets("") did not work. [ruby-core:03771]
+
 Sat Nov 20 22:55:09 2004  WATANABE Hirofumi  <eban@ruby-lang.org>
 
 	* test/runner.rb (CROSS_COMPILING): need to require rbconfig.rb before
diff --git a/io.c b/io.c
index 6059a974ee..f8237175df 100644
--- a/io.c
+++ b/io.c
@@ -1448,10 +1448,14 @@ rb_io_getline(rs, fptr)
 	}
 	newline = rsptr[rslen - 1];
 
-	while ((c = appendline(fptr, newline, &str)) != EOF &&
-	       (c != newline || RSTRING(str)->len < rslen ||
-		(rspara || rscheck(rsptr,rslen,rs)) ||
-		memcmp(RSTRING(str)->ptr+RSTRING(str)->len-rslen,rsptr,rslen)));
+	while ((c = appendline(fptr, newline, &str)) != EOF) {
+	    if (c == newline) {
+		if (RSTRING(str)->len < rslen) continue;
+		if (!rspara) rscheck(rsptr, rslen, rs);
+		if (memcmp(RSTRING(str)->ptr + RSTRING(str)->len - rslen,
+			   rsptr, rslen) == 0) break;
+	    }
+	}
 
 	if (rspara) {
 	    if (c != EOF) {