Mercurial > emacs
diff lisp/man.el @ 106782:7cf596e46b08
* man.el (Man-goto-section): Signal error if section not found (Bug#5317).
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 09 Jan 2010 18:53:06 -0500 |
parents | 11605ddedbe6 |
children | 1d1d5d9bd884 |
line wrap: on
line diff
--- a/lisp/man.el Sat Jan 09 18:39:36 2010 -0500 +++ b/lisp/man.el Sat Jan 09 18:53:06 2010 -0500 @@ -1500,7 +1500,9 @@ (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.