diff options
| -rw-r--r-- | common/.emacs.d/init.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/common/.emacs.d/init.el b/common/.emacs.d/init.el index 6b99704..32793d8 100644 --- a/common/.emacs.d/init.el +++ b/common/.emacs.d/init.el @@ -2039,7 +2039,12 @@ buffer's text scale." (defun my/mbsync (&optional arg) (interactive "P") (kill-buffer (get-buffer-create " *mbsync*")) - (call-process-shell-command "mbsync -a; mu index" nil " *mbsync*" arg)) + (let ((p (start-process-shell-command "mbsync" " *mbsync*" "mbsync -a; mu index"))) + (set-process-sentinel + p (lambda (p _) + (ignore _) + (unless (process-live-p p) + (message "mbsync done")))))) (keymap-set gnus-group-mode-map "<f5>" 'my/mbsync) |