From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 27 Mar 2007 15:19:33 +0000 (+0000)
Subject: (Fformat_network_address): Make room in args array to format IPv6 addresses.
X-Git-Tag: emacs-pretest-22.0.97~157
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ded83665701c9501162b6a7599ada92c187c44f9;p=emacs.git

(Fformat_network_address): Make room in args array to format IPv6 addresses.
---

diff --git a/src/process.c b/src/process.c
index b5e8f10bfab..4f6d2832f8d 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1268,7 +1268,7 @@ Returns nil if format of ADDRESS is invalid.  */)
   if (VECTORP (address))  /* AF_INET or AF_INET6 */
     {
       register struct Lisp_Vector *p = XVECTOR (address);
-      Lisp_Object args[6];
+      Lisp_Object args[10];
       int nargs, i;
 
       if (p->size == 4 || (p->size == 5 && !NILP (omit_port)))
@@ -1305,7 +1305,6 @@ Returns nil if format of ADDRESS is invalid.  */)
       args[0] = build_string ("<Family %d>");
       args[1] = Fcar (address);
       return Fformat (2, args);
-
     }
 
   return Qnil;