config: improve super agenda

master
Kore Francis 5 years ago
parent 1045da159b
commit 6fc5570e61

@ -74,7 +74,7 @@ change `org-directory'. It must be set before org loads!
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq org-todo-keywords (setq org-todo-keywords
'((sequence "TODO(t)" "PROJ(p)" "STRT(s)" "WAIT(w)" "HOLD(h)" "IDEA(i)" "|" "DONE(d)" "KILL(k)") '((sequence "TODO(t)" "PROJ(p)" "NEXT(n)" "STRT(s)" "WAIT(w)" "HOLD(h)" "IDEA(i)" "|" "DONE(d)" "KILL(k)")
(sequence "[ ](T)" "[-](S)" "[?](W)" "|" "[X](D)") (sequence "[ ](T)" "[-](S)" "[?](W)" "|" "[X](D)")
(sequence "|" "OKAY(o)" "YES(y)" "NO(n)"))) (sequence "|" "OKAY(o)" "YES(y)" "NO(n)")))
#+end_src #+end_src
@ -149,24 +149,39 @@ numbers are disabled. For relative line numbers, set this to `relative'.
#+end_src #+end_src
** Super-Agenda ** Super-Agenda
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package! org-super-agenda (after! org-agenda
:after org-agenda (org-super-agenda-mode))
:init
(setq org-super-agenda-groups '((:name "Today" (setq org-agenda-skip-scheduled-if-done t
org-agenda-skip-deadline-if-done t
org-agenda-include-deadlines t
org-agenda-block-separator nil
org-agenda-tags-column 100 ;; from testing this seems to be a good value
org-agenda-compact-blocks t)
(setq org-super-agenda-groups
'((:name "Next Items"
:time-grid t :time-grid t
:scheduled today) :tag ("NEXT" "outbox"))
(:name "Due Today"
:deadline today)
(:name "Important" (:name "Important"
:priority "❗") :priority "A")
(:name "Overdue" (:name "Quick Picks"
:deadline past) :effort< "0:30")
(:name "Due Soon" (:priority<= "B"
:deadline future) :scheduled future
(:name "Big Outcomes" :order 1)))
:tag "bo"))) ;(setq org-super-agenda-groups '((:name "Today"
:config ; :time-grid t
(org-super-agenda-mode)) ; :scheduled today)
; (:name "Due Today"
; :deadline today)
; (:name "Important"
; :priority "❗")
; (:name "Overdue"
; :deadline past)
; (:name "Due Soon"
; :deadline future)
; (:name "Big Outcomes"
; :tag "bo")))
#+end_src #+end_src
* Spelling * Spelling
#+begin_src emacs-lisp #+begin_src emacs-lisp

@ -50,6 +50,7 @@
;(unpin! t) ;(unpin! t)
(package! zetteldeft) (package! zetteldeft)
(package! org-roam-server) (package! org-roam-server)
(package! org-super-agenda)
(package! spray) (package! spray)
(package! mixed-pitch) (package! mixed-pitch)
(use-package! org-super-agenda
:commands (org-super-agenda-mode))

Loading…
Cancel
Save