summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/man.el4
2 files changed, 11 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 41e7b1acf4d..3d2d75f61ef 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2005-03-19 Yoichi NAKAYAMA <yoichi@geiin.org> (tiny changes)
+
+ * finder.el (finder-current-item): Throw an error on an empty
+ line.
+
+ * man.el (Man-follow-manual-reference): If current-word returns
+ nil, use "".
+
2005-03-19 Matt Hodges <MPHodges@member.fsf.org>
* simple.el (goto-line): Doc fix.
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