# HG changeset patch # User Dave Love # Date 941104119 0 # Node ID 53779a54d9cc636e3ab496e1cba1f7198048b196 # Parent cead5ead9ae671847d75c14a34ead5c8719ea645 (help-follow): Make arg optional again and really default to point. diff -r cead5ead9ae6 -r 53779a54d9cc lisp/help.el --- a/lisp/help.el Wed Oct 27 22:39:05 1999 +0000 +++ b/lisp/help.el Thu Oct 28 09:48:39 1999 +0000 @@ -1165,11 +1165,13 @@ (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))