# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1013651618 0
# Node ID dfa162af3bbdd3a8ee4f8193b92ad7d9215e0660
# Parent  d6866cd43406091a0e9b5565f7259f762ef59f93
(list-input-methods):
Use help-input-method, not describe-input-method, for button type.

diff -r d6866cd43406 -r dfa162af3bbd lisp/international/mule-diag.el
--- a/lisp/international/mule-diag.el	Thu Feb 14 01:47:50 2002 +0000
+++ b/lisp/international/mule-diag.el	Thu Feb 14 01:53:38 2002 +0000
@@ -1267,7 +1267,7 @@
 	(goto-char (point-min))
 	(while (re-search-forward
 		"^  \\([^ ]+\\) (`.*' in mode line)$" nil t)
-	  (help-xref-button 1 #'describe-input-method
+	  (help-xref-button 1 #'help-input-method
 				(match-string 1)
 				"mouse-2: describe this method")))
       (help-setup-xref '(list-input-methods) (interactive-p)))))