mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(rmail-spool-directory): Maybe use /var/mail.

Browse Source
This commit is contained in:
Richard M. Stallman 1994-05-22 20:36:53 +00:00
parent 8a1bbe07a8
commit 4233819a6e
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/paths.el
View File

@ -90,6 +90,12 @@ Will use `gnus-startup-file'-SERVER instead if exists.")
(defconst rmail-spool-directory
(cond ((string-match "^[^-]+-[^-]+-sco3.2v4" system-configuration)
"/usr/spool/mail/")
;; SVR4 is said to use /var/mail, and make /usr/mail a link to that;
;; but since I'm not sure it's generally true, calling file-exists-p
;; prevents lossage if it isn't true. -- rms.
((and (string-match "^[^-]+-[^-]+-sysv4" system-configuration)
(file-exists-p "/var/mail"))
"/var/mail/")
((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix))
"/usr/mail/")
((eq system-type 'netbsd)