From: Kenichi Handa <handa@m17n.org>
Date: Tue, 6 May 2003 05:08:32 +0000 (+0000)
Subject: (archive-set-buffer-as-visiting-file): Use
X-Git-Tag: ttn-vms-21-2-B4~10304
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a38ac4c2d8d0c328310cc316c2c2f6e8248a8a10;p=emacs.git

(archive-set-buffer-as-visiting-file): Use
after-insert-file-set-coding, not
after-insert-file-set-buffer-file-coding-system.
---

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 2c2569bb970..5b6e14d58db 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -894,8 +894,7 @@ using `make-temp-file', and the generated name is returned."
 	(setq last-coding-system-used coding))
       (set-buffer-modified-p nil)
       (kill-local-variable 'buffer-file-coding-system)
-      (after-insert-file-set-buffer-file-coding-system (- (point-max)
-							  (point-min))))))
+      (after-insert-file-set-coding (- (point-max) (point-min))))))
 
 (defun archive-mouse-extract (event)
   "Extract a file whose name you click on."