This commit is contained in:
Sakooooo 2024-01-09 21:19:56 +04:00
parent abe08f7537
commit 6161d6448e
Signed by: sako
GPG key ID: FE52FD65B76E4751

View file

@ -611,7 +611,7 @@ Cause emacs overlay lol
;; archive thingy i forgot ;; archive thingy i forgot
(setq org-refile-targets (setq org-refile-targets
'(("archive.org" :maxlevel . 1))) '(("archive.org" :maxlevel . 1)))
;; save org buffer before refile ;; save org buffer before refile
(advice-add 'org-refile :after 'org-save-all-org-buffers) (advice-add 'org-refile :after 'org-save-all-org-buffers)
@ -627,7 +627,7 @@ Cause emacs overlay lol
;; Following ;; Following
(setq org-return-follows-link t) (setq org-return-follows-link t)
;; hide stars except for leader star ;; hide stars except for leader star
(setq org-hide-leading-stars t) (setq org-hide-leading-stars t)
(setq org-hide-emphasis-markers nil) (setq org-hide-emphasis-markers nil)
@ -639,92 +639,101 @@ Cause emacs overlay lol
(add-to-list 'org-structure-template-alist '("py" . "src python")) (add-to-list 'org-structure-template-alist '("py" . "src python"))
(setq org-todo-keywords (setq org-todo-keywords
'((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d!)") '((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d!)")
(sequence "BACKLOG(b)" "PLAN(p)" "READY(r)" "ACTIVE(a)" "REVIEW(v)" "WAIT(w@/!)" "HOLD(h)" "|" "COMPLETED(c)" "CANCELED(k@)"))) (sequence "BACKLOG(b)" "PLAN(p)" "READY(r)" "ACTIVE(a)" "REVIEW(v)" "WAIT(w@/!)" "HOLD(h)" "|" "COMPLETED(c)" "CANCELED(k@)")))
(setq org-refile-targets (setq org-refile-targets
'(("archive.org" :maxlevel . 1) '(("archive.org" :maxlevel . 1)
("tasks.org" :maxlevel . 1))) ("tasks.org" :maxlevel . 1)))
;; Save Org buffers after refiling! ;; Save Org buffers after refiling!
(advice-add 'org-refile :after 'org-save-all-org-buffers) (advice-add 'org-refile :after 'org-save-all-org-buffers)
(setq org-tag-alist (setq org-tag-alist
'((:startgroup) '((:startgroup)
; Put mutually exclusive tags here ; Put mutually exclusive tags here
(:endgroup) (:endgroup)
("@errand" . ?E) ("@errand" . ?E)
("@home" . ?H) ("@home" . ?H)
("@work" . ?W) ("@work" . ?W)
("agenda" . ?a) ("agenda" . ?a)
("planning" . ?p) ("planning" . ?p)
("publish" . ?P) ("publish" . ?P)
("batch" . ?b) ("batch" . ?b)
("note" . ?n) ("note" . ?n)
("idea" . ?i))) ("idea" . ?i)))
;; should be less distracting
(setq org-agenda-prefix-format '(
;; (agenda . " %i %-12:c%?-12t% s") ;; file name + org-agenda-entry-type
(agenda . " - ")
(timeline . " % s")
(todo . " %i %-12:c")
(tags . " %i %-12:c")
(search . " %i %-12:c")))
;; Configure custom agenda views ;; Configure custom agenda views
(setq org-agenda-custom-commands (setq org-agenda-custom-commands
'(("d" "Dashboard" '(("d" "Dashboard"
((agenda "" ((org-deadline-warning-days 7))) ((agenda "" ((org-deadline-warning-days 7)))
(todo "NEXT" (todo "NEXT"
((org-agenda-overriding-header "Next Tasks"))) ((org-agenda-overriding-header "Next Tasks")))
(tags-todo "agenda/ACTIVE" ((org-agenda-overriding-header "Active Projects"))))) (tags-todo "agenda/ACTIVE" ((org-agenda-overriding-header "Active Projects")))))
("n" "Next Tasks" ("n" "Next Tasks"
((todo "NEXT" ((todo "NEXT"
((org-agenda-overriding-header "Next Tasks"))))) ((org-agenda-overriding-header "Next Tasks")))))
("W" "Work Tasks" tags-todo "+work-email") ("W" "Work Tasks" tags-todo "+work-email")
;; Low-effort next actions ;; Low-effort next actions
("e" tags-todo "+TODO=\"NEXT\"+Effort<15&+Effort>0" ("e" tags-todo "+TODO=\"NEXT\"+Effort<15&+Effort>0"
((org-agenda-overriding-header "Low Effort Tasks") ((org-agenda-overriding-header "Low Effort Tasks")
(org-agenda-max-todos 20) (org-agenda-max-todos 20)
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
("w" "Workflow Status" ("w" "Workflow Status"
((todo "WAIT" ((todo "WAIT"
((org-agenda-overriding-header "Waiting on External") ((org-agenda-overriding-header "Waiting on External")
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "REVIEW" (todo "REVIEW"
((org-agenda-overriding-header "In Review") ((org-agenda-overriding-header "In Review")
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "PLAN" (todo "PLAN"
((org-agenda-overriding-header "In Planning") ((org-agenda-overriding-header "In Planning")
(org-agenda-todo-list-sublevels nil) (org-agenda-todo-list-sublevels nil)
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "BACKLOG" (todo "BACKLOG"
((org-agenda-overriding-header "Project Backlog") ((org-agenda-overriding-header "Project Backlog")
(org-agenda-todo-list-sublevels nil) (org-agenda-todo-list-sublevels nil)
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "READY" (todo "READY"
((org-agenda-overriding-header "Ready for Work") ((org-agenda-overriding-header "Ready for Work")
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "ACTIVE" (todo "ACTIVE"
((org-agenda-overriding-header "Active Projects") ((org-agenda-overriding-header "Active Projects")
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "COMPLETED" (todo "COMPLETED"
((org-agenda-overriding-header "Completed Projects") ((org-agenda-overriding-header "Completed Projects")
(org-agenda-files org-agenda-files))) (org-agenda-files org-agenda-files)))
(todo "CANC" (todo "CANC"
((org-agenda-overriding-header "Cancelled Projects") ((org-agenda-overriding-header "Cancelled Projects")
(org-agenda-files org-agenda-files))))) (org-agenda-files org-agenda-files)))))
("1" "Events" agenda "display deadlines and exclude scheduled" ( ("1" "Events" agenda "display deadlines and exclude scheduled" (
(org-agenda-span 'month) (org-agenda-span 'month)
(org-agenda-time-grid nil) (org-agenda-time-grid nil)
(org-agenda-show-all-dates nil) (org-agenda-show-all-dates nil)
(org-agenda-entry-types '(:deadline)) ;; this entry excludes :scheduled (org-agenda-entry-types '(:deadline)) ;; this entry excludes :scheduled
(org-deadline-warning-days 0) )))) (org-deadline-warning-days 0) ))))
(setq org-capture-templates (setq org-capture-templates
`(("t" "Tasks / Projects") `(("t" "Tasks / Projects")
("tt" "Task" entry (file+olp "~/Projects/Code/emacs-from-scratch/OrgFiles/Tasks.org" "Inbox") ("tt" "Task" entry (file+olp "~/Projects/Code/emacs-from-scratch/OrgFiles/Tasks.org" "Inbox")
"* TODO %?\n %U\n %a\n %i" :empty-lines 1) "* TODO %?\n %U\n %a\n %i" :empty-lines 1)
("j" "Journal Entries") ("j" "Journal Entries")
("jj" "Journal" entry ("jj" "Journal" entry
(file+olp+datetree "~/Projects/Code/emacs-from-scratch/OrgFiles/Journal.org") (file+olp+datetree "~/Projects/Code/emacs-from-scratch/OrgFiles/Journal.org")
"\n* %<%I:%M %p> - Journal :journal:\n\n%?\n\n" "\n* %<%I:%M %p> - Journal :journal:\n\n%?\n\n"
;; ,(dw/read-file-as-string "~/Notes/Templates/Daily.org") ;; ,(dw/read-file-as-string "~/Notes/Templates/Daily.org")