summaryrefslogtreecommitdiff
path: root/lisp/man.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/man.el')
-rw-r--r--lisp/man.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/man.el b/lisp/man.el
index b34ca768707..bc475852808 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -1500,7 +1500,9 @@ Returns t if section is found, nil otherwise."
(string= chosen ""))
default
chosen)))
- (Man-find-section (aheadsym Man-sections-alist)))
+ (unless (Man-find-section (aheadsym Man-sections-alist))
+ (error "Section not found")))
+
(defun Man-goto-see-also-section ()
"Move point to the \"SEE ALSO\" section.