diff src/callproc.c @ 444:576fb035e263 r21-2-37

Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 1ccc32a20af4
line wrap: on
line diff
--- a/src/callproc.c	Mon Aug 13 11:35:05 2007 +0200
+++ b/src/callproc.c	Mon Aug 13 11:36:19 2007 +0200
@@ -331,9 +331,6 @@
     REGISTER char **save_environ = environ;
     REGISTER int fd1 = fd[1];
     int fd_error = fd1;
-    char **env;
-
-    env = environ;
 
     /* Record that we're about to create a synchronous process.  */
     synch_process_alive = 1;
@@ -452,7 +449,6 @@
 
   {
     int nread;
-    int first = 1;
     int total_read = 0;
     Lisp_Object instream;
     struct gcpro ngcpro1;
@@ -536,7 +532,6 @@
 
 	if (!NILP (display) && INTERACTIVE)
 	  {
-	    first = 0;
 	    redisplay ();
 	  }
       }