Mercurial > emacs

comparison lisp/help.el @ 23797:5475f2331d88

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(help-make-xrefs): Use `info', not the non-autoloaded `Info-goto-node'.
author Dave Love <fx@gnu.org>
date Wed, 02 Dec 1998 19:36:22 +0000
parents cfe23974522e
children 19e467700712
comparison
equal deleted inserted replaced
23796:cfe23974522e 23797:5475f2331d88
968 ((fboundp sym) 968 ((fboundp sym)
969 (help-xref-button 6 #'describe-function sym))))))) 969 (help-xref-button 6 #'describe-function sym)))))))
970 ;; Info references 970 ;; Info references
971 (save-excursion 971 (save-excursion
972 (while (re-search-forward help-xref-info-regexp nil t) 972 (while (re-search-forward help-xref-info-regexp nil t)
973 (help-xref-button 1 #'Info-goto-node (match-string 1)))) 973 (help-xref-button 1 #'info (match-string 1))))
974 ;; An obvious case of a key substitution: 974 ;; An obvious case of a key substitution:
975 (save-excursion 975 (save-excursion
976 (while (re-search-forward 976 (while (re-search-forward
977 "\\<M-x\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)" nil t) 977 "\\<M-x\\s-+\\(\\sw\\(\\sw\\|\\s_\\)+\\)" nil t)
978 (let ((sym (intern-soft (match-string 1)))) 978 (let ((sym (intern-soft (match-string 1))))