; (select-safe-coding-system-interactively): Say "safely encode".

(cherry picked from commit 78e6328fafddd4f39ed06d6ac4cecfb2f88d2fa4)

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c29fd9d34489dc7af8b9f210d8ce113639f34bf5..b3d0f4d551f40c64e064ba6fde7dd8a4b781a314 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -737,7 +737,7 @@ DEFAULT is the coding system to use by default in the query."
                          (format "string \"%s\"." from)
                        (format-message "buffer `%s'." bufname)))
            (insert
-            "These default coding systems were tried to encode"
+            "These default coding systems were tried to safely encode"
             (if (stringp from)
                 (concat " \"" (if (> (length from) 10)
                                   (concat (substring from 0 10) "...\"")
@@ -758,9 +758,9 @@ e.g., for sending an email message.\n ")
              (insert (if rejected "The other coding systems"
                        "However, each of them")
                      (substitute-command-keys
-                      " encountered characters it couldn't encode:\n"))
+                      " encountered characters it couldn't encode safely:\n"))
              (dolist (coding unsafe)
-               (insert (format "  %s cannot encode these:" (car coding)))
+               (insert (format "  %s cannot safely encode these:" (car coding)))
                (let ((i 0)
                      (func1
                        (lambda (bufname pos)