From: yamaoka <yamaoka>
Date: Fri, 22 Dec 2000 08:18:36 +0000 (+0000)
Subject: * raw-io.el: Require `pces'
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a8718a81e89ad74f5d19fb59079b3a5e883403ed;p=elisp%2Fflim.git

* raw-io.el: Require `pces'
(binary-insert-file-contents): Alias to `insert-file-contents-as-binary'.
(binary-write-region): Alias to `write-region-as-binary'.
(binary-find-file-noselect): Alias to `find-file-noselect-as-binary'.
(binary-open-network-stream): Alias to `open-network-stream-as-binary'.
(binary-start-process): Use `as-binary-process'.
(binary-start-process-shell-command): Use `as-binary-process'.
(raw-text-insert-file-contents): Alias to `insert-file-contents-as-raw-text'.
(raw-message-write-region): Alias to `write-region-as-raw-text-CRLF'.
---

diff --git a/raw-io.el b/raw-io.el
index 0074dea..19de7be 100644
--- a/raw-io.el
+++ b/raw-io.el
@@ -25,12 +25,10 @@
 ;;; Code:
 
 (eval-when-compile (require 'static))
+
 (require 'pces)
 
-(static-if (and (featurep 'xemacs)
-		(not (featurep 'utf-2000)))
-    (defalias 'binary-insert-file-contents 'insert-file-contents-as-binary)
-  (defalias 'binary-insert-file-contents 'insert-file-contents-literally))
+(defalias 'binary-insert-file-contents 'insert-file-contents-as-binary)
 
 (defalias 'binary-write-region 'write-region-as-binary)