summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/mail.el b/mail.el
index 6493ce3..47d7858 100644
--- a/mail.el
+++ b/mail.el
@@ -308,7 +308,8 @@ If FOREGROUND-P is `0', do not fetch mails, but just run
((and (numberp foreground-p)
(= foreground-p 0))
(run-hooks 'durand-mail-update-hook))
- ((make-process
+ ((not (get-process "durand-mail-update"))
+ (make-process
:name "durand-mail-update"
:command durand-mail-update-command
:filter (cond (foreground-p #'durand-mail-update-filter))