# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 743918574 0
# Node ID b39cd3621215d7fc3b0cb032825597ed3f3b7976
# Parent  c356a81e1a465901467c8eb81c0e346cf77a2c6f
* man.el (Man-find-section): HP/UX man pages have section names
indented by a single space; recognize them.

diff -r c356a81e1a46 -r b39cd3621215 lisp/man.el
--- a/lisp/man.el	Thu Jul 29 04:01:09 1993 +0000
+++ b/lisp/man.el	Thu Jul 29 04:02:54 1993 +0000
@@ -655,7 +655,7 @@
 Returns t if section is found, nil otherwise."
   (let ((curpos (point)))
     (goto-char (point-min))
-    (if (re-search-forward (concat "^" section) (point-max) t)
+    (if (re-search-forward (concat "^\\s-?" section) (point-max) t)
 	(progn (beginning-of-line) t)
       (goto-char curpos)
       nil)