From eb31c420960c0771795bb4df4b5653e440c5cd82 Mon Sep 17 00:00:00 2001 From: djcb Date: Sat, 7 Jan 2012 14:25:56 +0200 Subject: [PATCH] * mu4e-main: don't show queing options when not defined --- emacs/mu4e-main.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/emacs/mu4e-main.el b/emacs/mu4e-main.el index b025ef44..58ada22e 100644 --- a/emacs/mu4e-main.el +++ b/emacs/mu4e-main.el @@ -127,7 +127,7 @@ clicked." 'mu4e-retrieve-mail-update-db) ;; show the queue functions if `smtpmail-queue-dir' is defined - (if smtpmail-queue-dir + (if (file-directory-p smtpmail-queue-dir) (concat (mu4e-action-str "\t* toggle [m]ail sending mode " 'mu4e-toggle-mail-sending-mode) @@ -156,6 +156,8 @@ clicked." (defun mu4e-toggle-mail-sending-mode () "Toggle sending mail mode, either queued or direct." (interactive) + (unless (file-directory-p smtpmail-queue-dir) + (error "`smtp-queue-dir' does not exist")) (setq smtpmail-queue-mail (not smtpmail-queue-mail)) (message (if smtpmail-queue-mail