From 92adc7434ddc9e7eb5130bbf3c2c0000203edf9b Mon Sep 17 00:00:00 2001 From: morioka Date: Thu, 14 May 1998 07:10:11 +0000 Subject: [PATCH] (write-region-as-binary): fixed. --- emu-20.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/emu-20.el b/emu-20.el index 463dce7..d718ed7 100644 --- a/emu-20.el +++ b/emu-20.el @@ -53,7 +53,7 @@ (defun write-region-as-binary (start end filename &optional append visit lockname) "Like `write-region', q.v., but don't code conversion." - (let ((coding-system-for-read 'binary)) + (let ((coding-system-for-write 'binary)) (write-region start end filename append visit lockname) )) -- 1.7.10.4