(rmail-spool-directory): Use "/var/mail/" if system-type is netbsd.

1eff7356 · Roland McGrath · 60fa73fd · 1eff7356
Commit 1eff7356 authored Sep 10, 1993 by Roland McGrath
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 4 deletions

lisp/paths.el lisp/paths.el +6 -4

No files found.
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -100,10 +100,12 @@ The `ORGANIZATION' environment variable is used instead if defined.")
 Will use `gnus-startup-file'-SERVER instead if exists.")

 (defconst rmail-spool-directory
-  (if (memq system-type '(dgux-unix hpux usg-unix-v unisoft-unix rtu
-			  irix silicon-graphics-unix))
-      "/usr/mail/"
-    "/usr/spool/mail/")
+  (cond ((memq system-type '(dgux-unix hpux usg-unix-v unisoft-unix rtu
+				       irix silicon-graphics-unix))
+	 "/usr/mail/")
+	((eq system-type 'netbsd)
+	 "/var/mail/")
+	(t "/usr/spool/mail/"))
  "Name of directory used by system mailer for delivering new mail.
 Its name should end with a slash.")