(Man-heading-regexp): Accept multiple whitespace chars.

diff --git a/lisp/man.el b/lisp/man.el
index 225b627..b82fd50 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -201,7 +201,7 @@ the manpage buffer.")
 
 ;; Unless some system actually adds leading whitespace other than one space,
 ;; it is more reliable not to accept any other leading whitespace.
-(defvar Man-heading-regexp "^ ?*\\([A-Z][A-Z \t]+\\)$"
+(defvar Man-heading-regexp "^[ \t]*\\([A-Z][A-Z \t]+\\)$"
   "*Regular expression describing a manpage heading entry.")
 
 (defvar Man-see-also-regexp "SEE ALSO"