From: yamaoka <yamaoka>
Date: Fri, 22 Dec 2000 08:56:15 +0000 (+0000)
Subject: * raw-io.el (binary-start-process-shell-command): Replace #' with `function'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=98c2c171f690c0ba40eea85254f40b3d1b5918d5;p=elisp%2Fflim.git

* raw-io.el (binary-start-process-shell-command): Replace #' with `function'.
---

diff --git a/ChangeLog b/ChangeLog
index e7d5460..cf868d8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2000-12-22  Katsumi Yamaoka   <yamaoka@jpl.org>
 
+	* raw-io.el (binary-start-process-shell-command): Replace #' with
+	`function'.
+
+2000-12-22  Katsumi Yamaoka   <yamaoka@jpl.org>
+
 	* raw-io.el: Require `pces'
 	(binary-insert-file-contents): Alias to
 	`insert-file-contents-as-binary'.
diff --git a/raw-io.el b/raw-io.el
index 19de7be..ebbea17 100644
--- a/raw-io.el
+++ b/raw-io.el
@@ -48,7 +48,7 @@
        (apply (function start-process-shell-command) name buffer args))
     (as-binary-process
      (start-process name buffer shell-file-name shell-command-switch
-		 (mapconcat #'identity args " ")))))
+		 (mapconcat (function identity) args " ")))))
 
 (defalias 'raw-text-insert-file-contents 'insert-file-contents-as-raw-text)