From a8718a81e89ad74f5d19fb59079b3a5e883403ed Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 22 Dec 2000 08:18:36 +0000 Subject: [PATCH] * 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'. --- raw-io.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) 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) -- 1.7.10.4