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.