diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2020-08-08 13:49:48 +0200 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2020-08-09 20:59:11 -0300 |
| commit | 177cd31fbdff93254d576b737b55656d3a6086b5 (patch) | |
| tree | 8a07b9d1a394c77502e9d87fcd842889ea67ea16 | |
| parent | 14c4533c43ce319a8ba353f41e8c2f6be31164aa (diff) | |
emacs: notmuch-poll: Let the user know we are polling
It is done synchronously and it can take a while,
so we should let the user know what is going on.
| -rw-r--r-- | emacs/notmuch-lib.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/emacs/notmuch-lib.el b/emacs/notmuch-lib.el index 4496ecd2..6ff351d7 100644 --- a/emacs/notmuch-lib.el +++ b/emacs/notmuch-lib.el @@ -259,11 +259,13 @@ on the command line, and then retry your notmuch command"))) Invokes `notmuch-poll-script', \"notmuch new\", or does nothing depending on the value of `notmuch-poll-script'." (interactive) + (message "Polling mail...") (if (stringp notmuch-poll-script) (unless (string= notmuch-poll-script "") (unless (equal (call-process notmuch-poll-script nil nil) 0) (error "Notmuch: poll script `%s' failed!" notmuch-poll-script))) - (notmuch-call-notmuch-process "new"))) + (notmuch-call-notmuch-process "new")) + (message "Polling mail...done")) (defun notmuch-bury-or-kill-this-buffer () "Undisplay the current buffer. |