From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 22 Nov 1993 06:34:22 +0000 (+0000)
Subject: (Man-specified-section-option): New variable.
X-Git-Tag: emacs-19.34~10743
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9de0760cc8208b8a5ce16411d20c2a17fad2fb87;p=emacs.git

(Man-specified-section-option): New variable.
(Man-translate-references): Use that variable.
---

diff --git a/lisp/man.el b/lisp/man.el
index 709580f8636..a4bf961f389 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -209,6 +209,14 @@ This regular expression should start with a `^' character.")
 (defvar Man-switches ""
   "*Switches passed to the man command, as a single string.")
 
+;; Would someone like to provide a good test for being on Solaris?
+;; We could give it its own value of system-type, but that has drawbacks;
+;; it would require changes in lots of places that test system-type.
+(defvar Man-specified-section-option ""
+  "*Option that indicates a specified a manual section name.
+On most Unix systems, no option is needed for this.
+On Solaris, you need to set this to \"-s \".")
+
 ;; ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
 ;; end user variables
 
@@ -314,7 +322,7 @@ This regular expression should start with a `^' character.")
 				(Man-downcase s2)
 			      s2)
 		    slist nil))))
-	(concat section " " word))
+	(concat Man-specified-section-option section " " word))
     ref))
 
 (defun Man-linepos (&optional position col-p)