Mercurial > emacs
changeset 101791:b6da45c113db
(select-safe-coding-system): Use
buffer-chars-modified-tick instead of buffer-modified-tick.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 04 Feb 2009 07:44:03 +0000 |
| parents | e98ddfaefcae |
| children | 9670c4f7022a |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Wed Feb 04 07:32:51 2009 +0000 +++ b/lisp/international/mule-cmds.el Wed Feb 04 07:44:03 2009 +0000 @@ -975,7 +975,7 @@ (let ((codings (find-coding-systems-region from to)) (coding-system nil) - (tick (if (not (stringp from)) (buffer-modified-tick))) + (tick (if (not (stringp from)) (buffer-chars-modified-tick))) safe rejected unsafe) (if (eq (car codings) 'undecided) ;; Any coding system is ok. @@ -1041,7 +1041,7 @@ %s specified by file contents. Really save (else edit coding cookies \ and try again)? " coding-system auto-cs)) (error "Save aborted")))) - (when (and tick (/= tick (buffer-modified-tick))) + (when (and tick (/= tick (buffer-chars-modified-tick))) (error "Cancelled because the buffer was modified")) coding-system)))