summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2024-03-26 21:11:18 +0000
committerjao <jao@gnu.org>2024-03-26 21:11:18 +0000
commit608e9417c9393c0b69631597784cc02553adb80e (patch)
tree621f69e63fc9953c162dddce7149d526ea5d8b40
parent831b6195194e91ceb7e0beab6425a7608ae9619b (diff)
downloadelibs-608e9417c9393c0b69631597784cc02553adb80e.tar.gz
elibs-608e9417c9393c0b69631597784cc02553adb80e.tar.bz2
notmuch nits
-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:.+\\)")