From d9fc020b58c7de82276ea0f513e59ed53ebb90b3 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 7 May 1994 01:22:38 +0000 Subject: [PATCH] (rmail-spool-directory): On SCO 3.2v4, use /usr/spool/mail. --- lisp/paths.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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/") -- 2.39.5