Mercurial > emacs
changeset 60747:86c528510d44
(Man-follow-manual-reference): If current-word returns nil, use "".
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 19 Mar 2005 14:36:43 +0000 |
parents | 23533546bb38 |
children | e83f2fedadd4 |
files | lisp/man.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/man.el Sat Mar 19 14:35:59 2005 +0000 +++ b/lisp/man.el Sat Mar 19 14:36:43 2005 +0000 @@ -1305,7 +1305,9 @@ (error "There are no references in the current man page") (list (let* ((default (or (car (all-completions - (let ((word (Man-possibly-hyphenated-word))) + (let ((word + (or (Man-possibly-hyphenated-word) + ""))) ;; strip a trailing '-': (if (string-match "-$" word) (substring word 0