From 47e1dcfee1eaadebef070e28688097f0f6772781 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sat, 25 Jul 1998 02:02:59 +0000 Subject: [PATCH] Give set-auto-coding-funciton FILENAME argument. --- lisp/tar-mode.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index ad8bdea817b..3ca808a60c1 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -749,7 +749,8 @@ appear on disk when you save the tar-file's buffer." (let ((coding (and set-auto-coding-function (save-excursion - (funcall set-auto-coding-function (point-max))))) + (funcall set-auto-coding-function + name (point-max))))) (multibyte enable-multibyte-characters) (detected (detect-coding-region 1 (min 16384 (point-max)) t))) -- 2.39.2