From 5c366850f4f6166ee54ce74bb9541749b5748a6f Mon Sep 17 00:00:00 2001 From: Kore Francis Date: Fri, 9 Apr 2021 17:56:30 +0300 Subject: [PATCH] update: configurations for org super agenda --- config.el | 56 ++++++++++++++++++++++++++++++++++++----------------- config.org | 7 +++++-- packages.el | 3 +-- 3 files changed, 44 insertions(+), 22 deletions(-) diff --git a/config.el b/config.el index e96b54c..cf79bcb 100644 --- a/config.el +++ b/config.el @@ -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")) diff --git a/config.org b/config.org index 798beca..1e068db 100644 --- a/config.org +++ b/config.org @@ -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) diff --git a/packages.el b/packages.el index 24fe0ae..a9c5868 100644 --- a/packages.el +++ b/packages.el @@ -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)