changeset 30018:c7243fc7bcb6

(woman-man.conf-path): Explicitly include the debian man-db config file "/etc/manpath.config". (woman-parse-man.conf): Also handle MANDATORY_MANPATH entries, as are present in `manpath.config'. (woman-manpath): Include "/usr/share/man".

--- a/lisp/woman.el	Mon Jul 03 19:14:39 2000 +0000
+++ b/lisp/woman.el	Tue Jul 04 04:46:05 2000 +0000
@@ -500,7 +500,7 @@
   :group 'woman)
 
 (defcustom woman-man.conf-path
-  '("/etc" "/usr/local/lib")
+  '("/etc" "/etc/manpath.config" "/usr/local/lib")
   "*List of dirs to search and/or files to try for man config file.
 Default is '(\"/etc\" \"/usr/local/lib\") [for GNU/Linux, Cygwin resp.]
 A trailing separator (`/' for UNIX etc.) on directories is optional
@@ -517,7 +517,11 @@
 Look in `woman-man.conf-path' and return a value for `woman-manpath'.
 Concatenate data from all lines in the config file of the form
 
-MANPATH	/usr/man"
+  MANPATH	/usr/man
+
+or
+
+  MANDATORY_MANPATH     /usr/man"
   ;; Functionality suggested by Charles Curley.
   (let ((path woman-man.conf-path)
 	file manpath)
@@ -535,8 +539,8 @@
 		  (with-temp-buffer
 		    (insert-file-contents file)
 		    (while (re-search-forward
-			    "^[ \t]*MANPATH[ \t]+\\(\\S-+\\)" nil t)
-		      (setq manpath (cons (match-string 1) manpath)))
+			    "^[ \t]*\\(MANDATORY_\\)?MANPATH[ \t]+\\(\\S-+\\)" nil t)
+		      (setq manpath (cons (match-string 2) manpath)))
 		    manpath))
 		 ))
       (setq path (cdr path)))
@@ -547,7 +551,7 @@
     (or
      (and manpath (woman-parse-colon-path manpath))
      (woman-parse-man.conf)
-     '("/usr/man" "/usr/local/man")
+     '("/usr/man" "/usr/share/man" "/usr/local/man")
      ))
   "*List of DIRECTORY TREES to search for UN*X manual files.
 Each element should be the name of a directory that contains