From 5770f2b00ca3a7949aab18e4d8652265138799c6 Mon Sep 17 00:00:00 2001
From: noa@gaiwan.org
Date: Wed, 3 Jul 2024 11:08:13 +0000
Subject: Update agenda bindings

---
 config.org | 21 +++++++++++++++++----
 1 file changed, 17 insertions(+), 4 deletions(-)

(limited to 'config.org')

diff --git a/config.org b/config.org
index 5901aea..a0cd4d2 100644
--- a/config.org
+++ b/config.org
@@ -637,6 +637,15 @@ The default agenda time grid has thick lines which i don't think add anything to
   (setopt org-support-shift-select 'always)
 #+end_src
 
+Show calendar agenda and todos in the same buffer
+
+#+begin_src elisp
+  (setopt org-agenda-custom-commands
+          '(("n" "Todo list and agenda"
+             ((alltodo "")
+              (agenda "")))))
+#+end_src
+
 #+begin_src elisp
   ;; Make org html export more pleasant by default
   (setopt org-export-with-smart-quotes t)
@@ -663,13 +672,17 @@ This doesn't work with code blocks at the moment.
    #+end_src
 
 #+begin_src elisp
-(global-set-key (kbd "C-c c") #'org-capture)
-(global-set-key (kbd "C-c a") #'org-agenda)
-(global-set-key (kbd "C-c l") #'org-store-link)
+  (global-set-key (kbd "C-c c") #'org-capture)
+  (defun noa/org-agenda ()
+    "Directly open the agenda with todo list."
+    (interactive)
+    (org-agenda nil "n"))
+  (global-set-key (kbd "C-c a") #'noa/org-agenda)
+  (global-set-key (kbd "C-c l") #'org-store-link)
 #+end_src
 
 #+begin_src elisp :tangle no
-  ;; (package-ensure 'helm-org-ql)
+  ;; (package-ensure 'org-ql)
   ;; (package-ensure 'org-super-links)
   ;; (setopt org-super-links-search-function #'helm-org-ql)
 #+end_src
-- 
cgit 1.4.1-2-gfad0