summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--custom/jao-custom-notmuch.el11
1 files changed, 4 insertions, 7 deletions
diff --git a/custom/jao-custom-notmuch.el b/custom/jao-custom-notmuch.el
index 19bb0da..7e6bd32 100644
--- a/custom/jao-custom-notmuch.el
+++ b/custom/jao-custom-notmuch.el
@@ -266,12 +266,7 @@
(defun jao-notmuch-refresh-agenda ()
(interactive)
- (save-window-excursion (org-agenda-list))
- (let ((b (current-buffer)))
- (pop-to-buffer "*Calendar*")
- (goto-char (point-min))
- (calendar-goto-today)
- (pop-to-buffer b)))
+ (save-window-excursion (org-agenda-list)))
(defun jao-notmuch-hello-first ()
(interactive)
@@ -286,7 +281,9 @@
(derived-mode-p 'notmuch-hello-mode))
(when (not (string-blank-p jao-notmuch-minibuffer-string))
(let ((notmuch-hello-auto-refresh nil)) (notmuch-hello)))
- (when agenda (jao-notmuch-refresh-agenda))
+ (save-window-excursion
+ (calendar)
+ (when agenda (org-agenda-list)))
(unless (widget-at) (jao-notmuch-hello-first)))))
(defvar jao-notmuch-hello--sec-rx "^\\(\\[ [0-9]+\\|All tags:.+\\)")