From 400c12fd9831fa06739ecd3e24b68d051d9c138c Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 28 Oct 1999 09:48:39 +0000 Subject: [PATCH] (help-follow): Make arg optional again and really default to point. --- lisp/help.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/help.el b/lisp/help.el index c9c1821c732..40cc1dc089a 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -1165,11 +1165,13 @@ help buffer." (interactive) (help-follow (1- (point-max)))) -(defun help-follow (pos) +(defun help-follow (&optional pos) "Follow cross-reference at POS, defaulting to point. For the cross-reference format, see `help-make-xrefs'." (interactive "d") + (unless pos + (setq pos (point))) (let* ((help-data (or (and (not (= pos (point-max))) (get-text-property pos 'help-xref)) -- 2.39.5