diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2005-03-19 14:37:59 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2005-03-19 14:37:59 +0000 |
| commit | 580a2a02051154cf9c12ffa9cf1c9a25019ce747 (patch) | |
| tree | 0050e453a1ec3e4a682098330fe985a9a281ae21 /lisp/man.el | |
| parent | 62832105d79435a93a4a402f321f4401933184a9 (diff) | |
| download | emacs-580a2a02051154cf9c12ffa9cf1c9a25019ce747.tar.gz | |
(Man-follow-manual-reference): If current-word returns nil, use "".
Diffstat (limited to 'lisp/man.el')
| -rw-r--r-- | lisp/man.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el index 02661c55517..8c384028e17 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -1305,7 +1305,9 @@ Specify which REFERENCE to use; default is based on word at point." (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 |