From fba78e50eb0cb571682d9b54c3c7ec9caa3ab578 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 28 Jun 1998 22:52:49 +0000 Subject: [PATCH] (mh-find-progs): Avoid WTA error when mh-progs is nil. Give a clear specific error message instead. --- lisp/mail/mh-utils.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/mail/mh-utils.el b/lisp/mail/mh-utils.el index bcbe2e6a0b5..3e008d5d8db 100644 --- a/lisp/mail/mh-utils.el +++ b/lisp/mail/mh-utils.el @@ -599,7 +599,9 @@ Set the `mh-progs' and `mh-lib' variables to the file names." "/usr/local/bin/" ) "inc")))) + (or (and mh-lib (mh-file-command-p (expand-file-name "mhl" mh-lib))) + (null mh-progs) (setq mh-lib ;; Look for a lib directory roughly parallel to the bin ;; directory: Strip any trailing `mh' or `bin' path -- 2.39.5