diff options
| author | Richard M. Stallman | 2003-04-16 05:03:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-04-16 05:03:13 +0000 |
| commit | f1e4bcdb0c11df9fbf758c8deff8a4aef4dd13db (patch) | |
| tree | 2a735058a50023f521dc3196bbbfbe4a0eba74e3 | |
| parent | a7113309baf28c4740475c713490083c62872ebe (diff) | |
| download | emacs-f1e4bcdb0c11df9fbf758c8deff8a4aef4dd13db.tar.gz emacs-f1e4bcdb0c11df9fbf758c8deff8a4aef4dd13db.zip | |
(Man-follow-manual-reference): Don't require match
when calling completing-read.
| -rw-r--r-- | lisp/man.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el index c7cfe1de2fb..0c26ca4deb8 100644 --- a/lisp/man.el +++ b/lisp/man.el | |||
| @@ -1198,7 +1198,7 @@ Specify which REFERENCE to use; default is based on word at point." | |||
| 1198 | (aheadsym Man-refpages-alist))) | 1198 | (aheadsym Man-refpages-alist))) |
| 1199 | chosen | 1199 | chosen |
| 1200 | (prompt (concat "Refer to: (default " default ") "))) | 1200 | (prompt (concat "Refer to: (default " default ") "))) |
| 1201 | (setq chosen (completing-read prompt Man-refpages-alist nil t)) | 1201 | (setq chosen (completing-read prompt Man-refpages-alist)) |
| 1202 | (if (or (not chosen) | 1202 | (if (or (not chosen) |
| 1203 | (string= chosen "")) | 1203 | (string= chosen "")) |
| 1204 | default | 1204 | default |