update: configurations for org super agenda

master
Kore Francis 5 years ago
parent 6fc5570e61
commit 5c366850f4

@ -1,8 +1,8 @@
(setq user-full-name "Francis Kore"
user-mail-address "me@korefrancis.com")
;; (setq doom-font (font-spec :family "monospace" :size 12 :weight 'semi-light)
;; doom-variable-pitch-font (font-spec :family "sans" :size 13))
(setq doom-font (font-spec :family "monospace" :size 12 :weight 'semi-light)
doom-variable-pitch-font (font-spec :family "sans" :size 13))
(setq doom-theme 'doom-one)
@ -10,8 +10,11 @@
(setq deft-directory "~/org/deft")
(setq org-superstar-headline-bullets-list '("" "" "" "" ""))
;; Startup folded
(setq org-startup-folded 'overview)
(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 "|" "OKAY(o)" "YES(y)" "NO(n)")))
@ -60,24 +63,41 @@
(setq org-log-done t)
(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)
(use-package! org-super-agenda
:after org-agenda
:init
(setq org-super-agenda-groups '((:name "Today"
:time-grid t
:scheduled today)
(:name "Due Today"
:deadline today)
(:name "Important"
:priority "")
(:name "Overdue"
:deadline past)
(:name "Due Soon"
:deadline future)
(:name "Big Outcomes"
:tag "bo")))
:config
(setq org-super-agenda-groups
'((:name "Next Items"
:time-grid t
:tag ("NEXT" "outbox"))
(:name "Important"
:priority "A")
(:name "Quick Picks"
:effort< "0:30")
(:priority<= "B"
:scheduled future
:order 1)))
:config
(org-super-agenda-mode))
;(setq org-super-agenda-groups '((:name "Today"
; :time-grid t
; :scheduled today)
; (:name "Due Today"
; :deadline today)
; (:name "Important"
; :priority "❗")
; (:name "Overdue"
; :deadline past)
; (:name "Due Soon"
; :deadline future)
; (:name "Big Outcomes"
; :tag "bo")))
(setq ispell-program-name "aspell")
(setq ispell-extra-args '("--sug-mode=ultra" "--lang=en_US"))

@ -149,8 +149,6 @@ numbers are disabled. For relative line numbers, set this to `relative'.
#+end_src
** Super-Agenda
#+begin_src emacs-lisp
(after! org-agenda
(org-super-agenda-mode))
(setq org-agenda-skip-scheduled-if-done t
org-agenda-skip-deadline-if-done t
@ -158,6 +156,9 @@ numbers are disabled. For relative line numbers, set this to `relative'.
org-agenda-block-separator nil
org-agenda-tags-column 100 ;; from testing this seems to be a good value
org-agenda-compact-blocks t)
(use-package! org-super-agenda
:init
(setq org-super-agenda-groups
'((:name "Next Items"
:time-grid t
@ -169,6 +170,8 @@ numbers are disabled. For relative line numbers, set this to `relative'.
(:priority<= "B"
:scheduled future
:order 1)))
:config
(org-super-agenda-mode))
;(setq org-super-agenda-groups '((:name "Today"
; :time-grid t
; :scheduled today)

@ -52,5 +52,4 @@
(package! org-roam-server)
(package! spray)
(package! mixed-pitch)
(use-package! org-super-agenda
:commands (org-super-agenda-mode))
(use-package! org-super-agenda)

Loading…
Cancel
Save