From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 8 Aug 1998 01:03:27 +0000 (+0000)
Subject: (Fcall_process): Check type of process cmd args earlier on.
X-Git-Tag: emacs-20.3~139
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e7c1c20ebac86159106ab97f06a90a7f15322f59;p=emacs.git

(Fcall_process): Check type of process cmd args earlier on.
---

diff --git a/src/callproc.c b/src/callproc.c
index 7035aed4f50..6a1cfbc2c46 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -245,6 +245,9 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
       {
 	int must_encode = 0;
 
+	for (i = 4; i < nargs; i++)
+	  CHECK_STRING (args[i], i);
+
 	for (i = 4; i < nargs; i++)
 	  if (STRING_MULTIBYTE (args[i]))
 	    must_encode = 1;
@@ -401,8 +404,6 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
     {
       register int i;
 
-      for (i = 4; i < nargs; i++) CHECK_STRING (args[i], i);
-
       if (! CODING_REQUIRE_ENCODING (&argument_coding))
 	{
 	  for (i = 4; i < nargs; i++)