# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1087461207 0
# Node ID 80340a31718d16c9211d1a902356bde35108aa45
# Parent  b36f4311957c532875e5f28e7542904d941c1735
Undo 1.201 changes (committed accidentally)
except for the copyright year update.

diff -r b36f4311957c -r 80340a31718d src/callproc.c
--- a/src/callproc.c	Thu Jun 17 00:03:06 2004 +0000
+++ b/src/callproc.c	Thu Jun 17 08:33:27 2004 +0000
@@ -130,8 +130,6 @@
    this is exit code of synchronous subprocess.  */
 int synch_process_retcode;
 
-extern Lisp_Object Qredisplay_dont_pause;
-
 extern Lisp_Object Vdoc_file_name;
 
 extern Lisp_Object Vfile_name_coding_system, Vdefault_file_name_coding_system;
@@ -222,7 +220,7 @@
   int fd[2];
   int filefd;
   register int pid;
-  char buf[16384*4];
+  char buf[16384];
   char *bufptr = buf;
   int bufsize = sizeof buf;
   int count = SPECPDL_INDEX ();
@@ -773,7 +771,6 @@
 
 	    if (this_read == 0)
 	      {
-//		fprintf(stderr, "read 0, total=%d\n", total_read);
 		process_coding.mode |= CODING_MODE_LAST_BLOCK;
 		break;
 	      }
@@ -781,8 +778,6 @@
 	    nread += this_read;
 	    total_read += this_read;
 
-//	    fprintf(stderr, "read %d+%d of %d, total=%d\n", nread, this_read, bufsize, total_read);
-
 	    if (display_on_the_fly)
 	      break;
 	  }
@@ -835,8 +830,6 @@
 		    continue;
 		  }
 
-//		fprintf(stderr, "produced %d\n", process_coding.produced);
-
 		if (process_coding.produced > 0)
 		  insert_1_both (decoding_buf, process_coding.produced_char,
 				 process_coding.produced, 0, 1, 0);
@@ -936,15 +929,10 @@
 
 	if (!NILP (display) && INTERACTIVE)
 	  {
-	    extern int windows_or_buffers_changed;
-	    int count = SPECPDL_INDEX ();
-
 	    if (first)
 	      prepare_menu_bars ();
 	    first = 0;
-	    specbind (Qredisplay_dont_pause, Qt);
 	    redisplay_preserve_echo_area (1);
-	    unbind_to (count, Qnil);
 	  }
 	immediate_quit = 1;
 	QUIT;