diff src/callproc.c @ 21572:395ad34c576a

(Fcall_process): Call after-insert-file-set-buffer-file-coding-system if inherit-process-coding-system is non-nil.

--- a/src/callproc.c	Wed Apr 15 15:37:58 1998 +0000
+++ b/src/callproc.c	Wed Apr 15 15:44:16 1998 +0000
@@ -717,10 +717,16 @@
 	QUIT;
       }
   give_up: ;
-  }
 
   Vlast_coding_system_used = process_coding.symbol;
 
+  /* If the caller required, let the buffer inherit the
+     coding-system used to decode the process output.  */
+  if (inherit_process_coding_system)
+    call1 (intern ("after-insert-file-set-buffer-file-coding-system"),
+	   make_number (total_read));
+  }
+
   /* Wait for it to terminate, unless it already has.  */
   wait_for_termination (pid);