diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2013-06-30 17:27:07 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2013-06-30 17:27:07 +0300 |
| commit | 0865d506b58bd49932ec8eed0c6e486d2dfd8bb1 (patch) | |
| tree | 74357cae5831016afd711615121640b50aed60a0 /lisp/international/mule-cmds.el | |
| parent | 2fae38e5f99f51a8b316e12bd4607a5ec10d5f88 (diff) | |
| download | emacs-0865d506b58bd49932ec8eed0c6e486d2dfd8bb1.tar.gz | |
Fix bug #14755 which prevented autoloads from being computed.
lisp/international/mule-cmds.el (select-safe-coding-system): Handle
the case of FROM being a string correctly.
Diffstat (limited to 'lisp/international/mule-cmds.el')
| -rw-r--r-- | lisp/international/mule-cmds.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 6ef7709e930..62b96720771 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -1031,7 +1031,10 @@ and try again)? " coding-system auto-cs)) (error "Canceled because the buffer was modified")) (if (and (eq (coding-system-type coding-system) 'undecided) (coding-system-get coding-system :prefer-utf-8) - (< (- to from) (- (position-bytes to) (position-bytes from)))) + (or (multibyte-string-p from) + (and (number-or-marker-p from) + (< (- to from) + (- (position-bytes to) (position-bytes from)))))) (setq coding-system (coding-system-change-text-conversion coding-system 'utf-8))) coding-system))) |