Mercurial > emacs

changeset 26224:53779a54d9cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(help-follow): Make arg optional again and really default to point.
author Dave Love <fx@gnu.org>
date Thu, 28 Oct 1999 09:48:39 +0000
parents cead5ead9ae6
children 91cb7b3bae3c
files lisp/help.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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))