[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/international mule-cmds.el
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] emacs/lisp/international mule-cmds.el |
Date: |
Wed, 04 Feb 2009 07:44:03 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Kenichi Handa <handa> 09/02/04 07:44:03
Modified files:
lisp/international: mule-cmds.el
Log message:
(select-safe-coding-system): Use
buffer-chars-modified-tick instead of buffer-modified-tick.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/mule-cmds.el?cvsroot=emacs&r1=1.356&r2=1.357
Patches:
Index: mule-cmds.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/mule-cmds.el,v
retrieving revision 1.356
retrieving revision 1.357
diff -u -b -r1.356 -r1.357
--- mule-cmds.el 27 Jan 2009 04:36:35 -0000 1.356
+++ mule-cmds.el 4 Feb 2009 07:44:03 -0000 1.357
@@ -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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/international mule-cmds.el,
Kenichi Handa <=