diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-05-07 01:22:38 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-05-07 01:22:38 +0000 |
| commit | ab99cf50e1d193e43e95ea8194d138585c71cc44 (patch) | |
| tree | f88e95149b15ebf002337d4d214f3e93efec50bc | |
| parent | 0dd43d325534b627aa0cd05853ce9127bb45865b (diff) | |
| download | emacs-ab99cf50e1d193e43e95ea8194d138585c71cc44.tar.gz | |
(rmail-spool-directory): On SCO 3.2v4, use /usr/spool/mail.
| -rw-r--r-- | lisp/paths.el | 4 |
1 files changed, 3 insertions, 1 deletions
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/") |