From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 12 Apr 2006 15:00:32 +0000 (+0000)
Subject: (conv_lisp_to_sockaddr): If FAMILY unknown, just return.
X-Git-Tag: emacs-pretest-22.0.90~3179
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6bf890d76abf3ab3e19eb730512d0ad82fa45407;p=emacs.git

(conv_lisp_to_sockaddr): If FAMILY unknown, just return.
---

diff --git a/src/process.c b/src/process.c
index 08c515d34e0..29c93052369 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2322,7 +2322,9 @@ get_lisp_to_sockaddr_size (address, familyp)
 }
 
 /* Convert an address object (vector or string) to an internal sockaddr.
-   Format of address has already been validated by size_lisp_to_sockaddr.  */
+   Address format has already been validated by get_lisp_to_sockaddr_size,
+   but just to be nice, we return without doing anything
+   if FAMILY is not valid.  */
 
 static void
 conv_lisp_to_sockaddr (family, address, sa, len)
@@ -2366,6 +2368,7 @@ conv_lisp_to_sockaddr (family, address, sa, len)
 	  return;
 	}
 #endif
+      return;
     }
   else if (STRINGP (address))
     {