From 5833af3a811e0c9f6dbef11d4919f12a9823ef41 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 20 Mar 1994 04:21:12 +0000 Subject: [PATCH] (mh-progs, mh-lib): Deleted. --- lisp/paths.el | 21 +++------------------ 1 file changed, 3 insertions(+), 18 deletions(-) diff --git a/lisp/paths.el b/lisp/paths.el index aacbd366eb5..e72cea01c8b 100644 --- a/lisp/paths.el +++ b/lisp/paths.el @@ -80,28 +80,13 @@ there is no need to set this variable.") "*The name of your organization, as a string. The `ORGANIZATION' environment variable is used instead if defined.") -(defvar mh-progs - (cond ((file-directory-p "/usr/bin/mh/") "/usr/bin/mh/") ;Ultrix 4.2 - ((file-directory-p "/usr/new/mh/") "/usr/new/mh/") ;Ultrix <4.2 - ((file-directory-p "/usr/local/bin/mh/") "/usr/local/bin/mh/") - ((file-directory-p "/usr/local/mh/") "/usr/local/mh/") - (t "/usr/local/bin/")) - "Directory containing MH commands.") - -(defvar mh-lib - (cond ((file-directory-p "/usr/lib/mh/") "/usr/lib/mh/") ;Ultrix 4.2 - ((file-directory-p "/usr/new/lib/mh/") "/usr/new/lib/mh/") ;Ultrix <4.2 - ((file-directory-p "/usr/local/lib/mh/") "/usr/local/lib/mh/") - (t "/usr/local/bin/mh/")) - "Directory of MH library.") - -(defvar rmail-file-name "~/RMAIL" - "Name of user's primary mail file.") - (defvar gnus-startup-file "~/.newsrc" "The file listing groups to which user is subscribed. Will use `gnus-startup-file'-SERVER instead if exists.") +(defvar rmail-file-name "~/RMAIL" + "Name of user's primary mail file.") + (defconst rmail-spool-directory (cond ((memq system-type '(dgux hpux usg-unix-v unisoft-unix rtu irix)) "/usr/mail/") -- 2.39.5