Mercurial > emacs
comparison lisp/help.el @ 24714:19bd1617f9e3
(help-make-xrefs): Fix typpo.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Mon, 10 May 1999 15:08:22 +0000 |
| parents | bcb0ee72502c |
| children | a03aa24489bd |
comparison
equal
deleted
inserted
replaced
| 24713:f58ed4088d54 | 24714:19bd1617f9e3 |
|---|---|
| 1038 (progn | 1038 (progn |
| 1039 (and (eolp) (forward-line)) | 1039 (and (eolp) (forward-line)) |
| 1040 (end-of-line) | 1040 (end-of-line) |
| 1041 (skip-chars-backward "^\t\n") | 1041 (skip-chars-backward "^\t\n") |
| 1042 (if (and (>= (current-column) col) | 1042 (if (and (>= (current-column) col) |
| 1043 +(looking-at "\\(\\sw\\|-\\)+$")) | 1043 (looking-at "\\(\\sw\\|-\\)+$")) |
| 1044 ;; | |
| 1045 (let ((sym (intern-soft (match-string 0)))) | 1044 (let ((sym (intern-soft (match-string 0)))) |
| 1046 (if (fboundp sym) | 1045 (if (fboundp sym) |
| 1047 (help-xref-button | 1046 (help-xref-button |
| 1048 0 #'describe-function sym)))) | 1047 0 #'describe-function sym)))) |
| 1049 (zerop (forward-line))))))))) | 1048 (zerop (forward-line))))))))) |