Commit 7d03c5b1 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(select-safe-coding-system-interactively):

Improve the message in *Warning* buffer.
parent 39449da0
2006-12-27 Kenichi Handa <handa@m17n.org>
* international/mule-cmds.el (select-safe-coding-system-interactively):
Improve the message in *Warning* buffer.
2006-12-27 Kim F. Storm <storm@cua.dk>
 
* ido.el (ido-set-matches-1): Never put current buffer first if
......@@ -787,19 +787,21 @@ e.g., for sending an email message.\n ")
(setq i (1+ i))))
(insert "\n"))
(insert "\
The first problematic character is at point in the displayed buffer,\n"
Click those characters to jump to the place they appear,\n"
(substitute-command-keys "\
and \\[universal-argument] \\[what-cursor-position] will give information about it.\n"))))
(insert "\nSelect \
one of the following safe coding systems, or edit the buffer:\n")
(insert (substitute-command-keys "\nSelect \
one of the following safe coding systems,\n\
or cancel the writing by \\[keyboard-quit] and edit the buffer,\n\
or specify any other coding system at the risk of
losing the problematic characters.\n"))
(let ((pos (point))
(fill-prefix " "))
(dolist (x codings)
(princ " ") (princ x))
(insert "\n")
(fill-region-as-paragraph pos (point)))
(insert "Or specify any other coding system
at the risk of losing the problematic characters.\n")))
(fill-region-as-paragraph pos (point)))))
;; Read a coding system.
(setq coding-system
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment