Mercurial > emacs
comparison lisp/international/mule.el @ 50529:6f2a35c77d07
Set after-insert-file-adjust-coding-function to
after-insert-file-set-buffer-file-coding-system instead of adding it
to after-insert-file-functions.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 10 Apr 2003 11:59:45 +0000 |
parents | 15141bb6dc1f |
children | 589dbff3b754 |
comparison
equal
deleted
inserted
replaced
50528:dae46d521201 | 50529:6f2a35c77d07 |
---|---|
1715 (set-buffer-multibyte nil) | 1715 (set-buffer-multibyte nil) |
1716 (setq inserted (- pos-byte (position-bytes (point)))))) | 1716 (setq inserted (- pos-byte (position-bytes (point)))))) |
1717 (set-buffer-modified-p modified-p)))) | 1717 (set-buffer-modified-p modified-p)))) |
1718 inserted) | 1718 inserted) |
1719 | 1719 |
1720 (add-hook 'after-insert-file-functions | 1720 (setq after-insert-file-adjust-coding-function |
1721 'after-insert-file-set-buffer-file-coding-system) | 1721 'after-insert-file-set-buffer-file-coding-system) |
1722 | 1722 |
1723 ;; The coding-spec and eol-type of coding-system returned is decided | 1723 ;; The coding-spec and eol-type of coding-system returned is decided |
1724 ;; independently in the following order. | 1724 ;; independently in the following order. |
1725 ;; 1. That of buffer-file-coding-system locally bound. | 1725 ;; 1. That of buffer-file-coding-system locally bound. |
1726 ;; 2. That of CODING. | 1726 ;; 2. That of CODING. |