Commit 11bdb42c authored by Glenn Morris's avatar Glenn Morris
Browse files

(rmail-movemail-variant-p): Call on load to set movemail related variables.

(rmail-insert-inbox-text): Use only rmail-movemail-program, which
will now be set before this is called.
parent b8fa755b
2007-08-22 Glenn Morris <rgm@gnu.org>
* mail/rmail.el (rmail-movemail-variant-p): Call on load to set
movemail related variables.
(rmail-insert-inbox-text): Use only rmail-movemail-program, which
will now be set before this is called.
2007-08-21 Juri Linkov <juri@jurta.org>
* delsel.el (delete-selection-pre-hook):
......
......@@ -239,6 +239,12 @@ Currently known variants are 'emacs and 'mailutils."
(setq rmail-movemail-variant-in-use (rmail-autodetect)))
(not (null (member rmail-movemail-variant-in-use variants))))
;; Call for effect, to set rmail-movemail-program (if not set by the
;; user), and rmail-movemail-variant-in-use. Used by various functions.
;; I'm not sure if M-x rmail is the only entry point to this package.
;; If so, this can be moved there.
(rmail-movemail-variant-p)
;;;###autoload
(defcustom rmail-dont-reply-to-names nil "\
*A regexp specifying addresses to prune from a reply message.
......@@ -1818,10 +1824,7 @@ is non-nil if the user has supplied the password interactively.
(buffer-disable-undo errors)
(let ((args
(append
(list (or rmail-movemail-program
(expand-file-name "movemail"
exec-directory))
nil errors nil)
(list rmail-movemail-program nil errors nil)
(if rmail-preserve-inbox
(list "-p")
nil)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment