Mercurial > emacs
changeset 32439:85cb584c95ba
(select-safe-coding-system): If FROM is string, show it in *Warning*
buffer.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 13 Oct 2000 00:43:30 +0000 |
| parents | 98e7cf21e374 |
| children | 4e98e54082d2 |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Fri Oct 13 00:42:45 2000 +0000 +++ b/lisp/international/mule-cmds.el Fri Oct 13 00:43:30 2000 +0000 @@ -598,7 +598,14 @@ (with-output-to-temp-buffer "*Warning*" (save-excursion (set-buffer standard-output) - (insert "The following default coding systems were tried:\n") + (insert "These default coding systems were tried") + (if (stringp from) + (insert " to encode \"" + (if (> (length from) 10) + (substring from 0 10) + from) + "...\"")) + (insert ":\n") (let ((pos (point)) (fill-prefix " ")) (mapcar (function (lambda (x) (princ " ") (princ (car x))))