diff --git a/ChangeLog b/ChangeLog
index e0751372a2..72d694813e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Thu Oct  4 14:11:03 2001  WATANABE Hirofumi  <eban@ruby-lang.org>
+
+	* ext/socket/socket.c (ruby_connect): EALREADY is the equivalent
+	  for EINPROGRESS in ws2_32.lib.
+
 Wed Oct  3 16:49:49 2001  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
 
 	* ext/gdbm/gdbm.c (rb_gdbm_fetch): str is a VALUE now.
diff --git a/ext/socket/socket.c b/ext/socket/socket.c
index 5b7d8ebefb..8974096bbc 100644
--- a/ext/socket/socket.c
+++ b/ext/socket/socket.c
@@ -747,6 +747,7 @@ ruby_connect(fd, sockaddr, len, socks)
 #ifdef EINPROGRESS
 	      case EINPROGRESS:
 #if defined __CYGWIN__
+	      case EALREADY:
 		wait_in_progress = 10;
 #endif
 #endif
@@ -754,9 +755,8 @@ ruby_connect(fd, sockaddr, len, socks)
 		continue;
 
 #if defined __CYGWIN__
-	      case EALREADY:
 	      case EINVAL:
-		if (--wait_in_progress > 0) {
+		if (wait_in_progress-- > 0) {
 		    struct timeval tv = {0, 100000};
 		    rb_thread_wait_for(tv);
 		    continue;
diff --git a/version.h b/version.h
index e4300bb917..f5828b1726 100644
--- a/version.h
+++ b/version.h
@@ -1,4 +1,4 @@
 #define RUBY_VERSION "1.7.1"
-#define RUBY_RELEASE_DATE "2001-10-02"
+#define RUBY_RELEASE_DATE "2001-10-04"
 #define RUBY_VERSION_CODE 171
-#define RUBY_RELEASE_CODE 20011002
+#define RUBY_RELEASE_CODE 20011004