Mercurial > emacs
changeset 24381:b3c0f3ad64d8
(archive-set-buffer-as-visiting-file): Save
excursion while calling set-auto-coding-function.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Mon, 22 Feb 1999 16:01:30 +0000 |
| parents | 6ef51f9beabc |
| children | 740c8322ca39 |
| files | lisp/arc-mode.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/arc-mode.el Mon Feb 22 13:37:10 1999 +0000 +++ b/lisp/arc-mode.el Mon Feb 22 16:01:30 1999 +0000 @@ -844,8 +844,9 @@ (let ((coding (or coding-system-for-read (and set-auto-coding-function - (funcall set-auto-coding-function - filename (- (point-max) (point-min)))) + (save-excursion + (funcall set-auto-coding-function + filename (- (point-max) (point-min))))) ;; dos-w32.el defines find-operation-coding-system for ;; DOS/Windows systems which preserves the coding-system ;; of existing files. We want it to act here as if the