* man.el (Man-goto-section): Signal error if section not found (Bug#5317).

This commit is contained in:
Chong Yidong 2010-01-09 18:53:06 -05:00
parent 8fe7200cbc
commit e709e39d6e
2 changed files with 8 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2010-01-09 Chong Yidong <cyd@stupidchicken.com>
* man.el (Man-goto-section): Signal error if the section is not
found (Bug#5317).
2010-01-09 Juanma Barranquero <lekktu@gmail.com>
* vc-bzr.el (vc-bzr-working-revision): On Windows and MS-DOS, accept

View file

@ -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.