# HG changeset patch
# User michaels
# Date 1022829292 0
# Node ID b5278486690c4d9c2cb4a79d0582a6a4c5bbc9b5
# Parent  b27b70c1252a8b00178cea7ca55ecf84cf289563
[xemacs-hg @ 2002-05-31 07:14:51 by michaels]
2002-05-30  Michael Sperber [Mr. Preprocessor]  <sperber@informatik.uni-tuebingen.de>

	* code-process.el (call-process): Ensure that the argument to
	`symbol-value-in-buffer' is a buffer even if `buffer' is a string.

diff -r b27b70c1252a -r b5278486690c lisp/ChangeLog
--- a/lisp/ChangeLog	Wed May 29 13:48:56 2002 +0000
+++ b/lisp/ChangeLog	Fri May 31 07:14:52 2002 +0000
@@ -1,3 +1,8 @@
+2002-05-30  Michael Sperber [Mr. Preprocessor]  <sperber@informatik.uni-tuebingen.de>
+
+	* code-process.el (call-process): Ensure that the argument to
+	`symbol-value-in-buffer' is a buffer even if `buffer' is a string.
+
 2002-05-28  Ben Wing  <ben@xemacs.org>
 
 	* code-init.el:
diff -r b27b70c1252a -r b5278486690c lisp/code-process.el
--- a/lisp/code-process.el	Wed May 29 13:48:56 2002 +0000
+++ b/lisp/code-process.el	Fri May 31 07:14:52 2002 +0000
@@ -123,7 +123,7 @@
 		 (and (or (bufferp thebuf) (stringp thebuf))
 		      (get-buffer thebuf)
 		      (symbol-value-in-buffer
-		       'buffer-file-coding-system-for-read thebuf)))
+		       'buffer-file-coding-system-for-read (get-buffer thebuf))))
 	       (car default-process-coding-system)
 	       'undecided))
 	  (coding-system-for-write