From: Eli Zaretskii Date: Sun, 30 Jun 2013 14:27:07 +0000 (+0300) Subject: Fix bug #14755 which prevented autoloads from being computed. X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~1982 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0865d506b58bd49932ec8eed0c6e486d2dfd8bb1;p=emacs.git 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. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4aa4f37a323..283b948a2db 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-06-30 Eli Zaretskii + + * international/mule-cmds.el (select-safe-coding-system): Handle + the case of FROM being a string correctly. (Bug#14755) + 2013-06-30 Lars Magne Ingebrigtsen * net/shr.el (shr-make-table-1): Add a sanity check that allows 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)))