2 files changed, 9 insertions, 1 deletions

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  <eliz@gnu.org>
+
+        * 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  <larsi@gnus.org>
 
         * 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)))