# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 881707665 0
# Node ID afef187a070b5ed355a801832d4079ac85fe08dc
# Parent  5e449f7584b25ab47df6bf6389327e3012bf6292
(Fcall_process): Don't clobber new_argv[0]
in the case of no args.

diff -r 5e449f7584b2 -r afef187a070b src/callproc.c
--- a/src/callproc.c	Tue Dec 09 22:43:32 1997 +0000
+++ b/src/callproc.c	Tue Dec 09 22:47:45 1997 +0000
@@ -452,8 +452,10 @@
 	    }
 	  UNGCPRO;
 	}
+      new_argv[nargs - 3] = 0;
     }
-  new_argv[nargs - 3] = 0;
+  else
+    new_argv[1] = 0;
 
 #ifdef MSDOS /* MW, July 1993 */
   if ((outf = egetenv ("TMP")) || (outf = egetenv ("TEMP")))