Commit c381cb8d authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(select-safe-coding-system): Use

buffer-chars-modified-tick instead of buffer-modified-tick.
parent 65105010
......@@ -24,6 +24,9 @@
 
2009-02-04 Kenichi Handa <handa@m17n.org>
 
* international/mule-cmds.el (select-safe-coding-system): Use
buffer-chars-modified-tick instead of buffer-modified-tick.
* descr-text.el (describe-char): Check font-object by fontp.
 
* composite.el (compose-gstring-for-terminal): If a character is
......
......@@ -975,7 +975,7 @@ It is highly recommended to fix it before writing to a file."
(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 @@ It is highly recommended to fix it before writing to a file."
%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)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment