From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 7 May 1994 01:22:38 +0000 (+0000)
Subject: (rmail-spool-directory): On SCO 3.2v4, use /usr/spool/mail.
X-Git-Tag: emacs-19.34~8477
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d9fc020b58c7de82276ea0f513e59ed53ebb90b3;p=emacs.git

(rmail-spool-directory): On SCO 3.2v4, use /usr/spool/mail.
---

diff --git a/lisp/paths.el b/lisp/paths.el
index 3a285f55734..f4748f96921 100644
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -88,7 +88,9 @@ Will use `gnus-startup-file'-SERVER instead if exists.")
   "Name of user's primary mail file.")
 
 (defconst rmail-spool-directory
-  (cond ((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix))
+  (cond ((string-match "^[^-]+-[^-]+-sco3.2v4" system-configuration)
+	 "/usr/spool/mail/")
+	((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix))
 	 "/usr/mail/")
 	((eq system-type 'netbsd)
 	 "/var/mail/")