--- /lib/sh/netconn.c	Sat Oct 12 20:47:38 2002
+++ /lib/sh/netconn.c_new	Sat Jan 22 20:58:20 2005
@@ -53,7 +53,8 @@
   l = sizeof(sa);
   rv = getpeername(fd, &sa, &l);
   /* Solaris 2.5 getpeername() returns EINVAL if the fd is not a socket. */
-  return ((rv < 0 && (errno == ENOTSOCK || errno == EINVAL)) ? 0 : 1);
+  /* Darwin 7.7.0 getpeername() returns ENOTCONN if the fd was created with pipe(). */
+  return ((rv < 0 && (errno == ENOTSOCK || errno == ENOTCONN || errno == EINVAL)) ? 0 : 1);
 #else /* !HAVE_GETPEERNAME || SVR4_2 || __BEOS__ */
 #  if defined (SVR4) || defined (SVR4_2)
   /* Sockets on SVR4 and SVR4.2 are character special (streams) devices. */