(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'.
;;; 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)