From 4e21e5aa1a2f801bf46b1729c28ec67bf6f4308c Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 27 Dec 2006 05:11:42 +0000 Subject: [PATCH] (select-safe-coding-system-interactively): Use face `link' for problematic chars. --- lisp/international/mule-cmds.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index e558b49df4c..aacce1b4190 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -772,6 +772,7 @@ e.g., for sending an email message.\n ") (insert-text-button (cdr elt) :type 'help-xref + 'face 'link 'help-echo "mouse-2, RET: jump to this character" 'help-function func1 @@ -779,6 +780,7 @@ e.g., for sending an email message.\n ") (insert-text-button "..." :type 'help-xref + 'face 'link 'help-echo "mouse-2, RET: next unencodable character" 'help-function func2 @@ -790,7 +792,7 @@ e.g., for sending an email message.\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")))) +and there \\[universal-argument] \\[what-cursor-position] will give information about it.\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\ -- 2.39.2