From fbe7e824b9e0cc03d2a61cf99cd625c7f18539f3 Mon Sep 17 00:00:00 2001 From: morioka Date: Sat, 21 Mar 1998 16:11:42 +0000 Subject: [PATCH] Move `insert-binary-file-contents' to emu-x20.el. --- emu-20.el | 7 ------- 1 file changed, 7 deletions(-) diff --git a/emu-20.el b/emu-20.el index aaae55c..2bc7d6a 100644 --- a/emu-20.el +++ b/emu-20.el @@ -60,13 +60,6 @@ find-file-hooks, etc. (insert-file-contents-literally filename visit beg end replace) )) -(defun insert-binary-file-contents (filename &optional visit beg end replace) - "Like `insert-file-contents', q.v., but don't code and format conversion." - (let ((coding-system-for-read 'binary) - format-alist) - (insert-file-contents filename visit beg end replace) - )) - (defun write-region-as-binary (start end filename &optional append visit lockname) "Like `write-region', q.v., but don't code conversion." -- 1.7.10.4