(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 2c2569bb970bdde79f8ac4b207f384857b9ba808..5b6e14d58db275f56436bbea1159d6d09a6820fa 100644 (file)
--- 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."