Mercurial > emacs
changeset 855:a3068bc219cf
entered into RCS
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 23 Jul 1992 18:27:13 +0000 |
| parents | 0b4f3a91f207 |
| children | 583035084779 |
| files | lisp/paths.el |
| diffstat | 1 files changed, 11 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/paths.el Wed Jul 22 23:07:07 1992 +0000 +++ b/lisp/paths.el Thu Jul 23 18:27:13 1992 +0000 @@ -70,17 +70,19 @@ The `ORGANIZATION' environment variable is used instead if defined.") (defvar mh-progs - (cond ((file-directory-p "/usr/new/mh") "/usr/new/mh/") - ((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") + (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/new/lib/mh") "/usr/new/lib/mh/") - ((file-directory-p "/usr/local/lib/mh") "/usr/local/lib/mh/") - (t "/usr/local/bin/mh/")) - "Directory of MH library") + (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.")