kemonine
/
emacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

add 'homework' tag options to agenda

This commit is contained in:
KemoNine 2024-03-07 12:59:41 -05:00
parent 5b0dd9c20f
commit 98dfba796f
2 changed files with 21 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
org/config-org-agendas.el
View File

@ -121,6 +121,10 @@
(:name "Meds"
:and (:habit t
:tag "meds"))
(:name "Health"
:and (:tag "health" :tag "homework"))
(:name "Misc"
:tag "homework")
(:name "Health"
:and (:todo ("WIP" "READY")
:tag "health"))
@ -155,15 +159,19 @@
"~/org/health/_meds.org"))
(org-agenda-remove-tags t)
))
(todo "WIP" (
(tags-todo "+homework" (
(org-agenda-overriding-header "Homework")
(org-agenda-remove-tags t)
))
(tags-todo "+TODO=\"WIP\"&-homework" (
(org-agenda-overriding-header "WIP")
(org-agenda-remove-tags t)
))
(todo "READY" (
(tags-todo "+TODO=\"READY\"&-homework" (
(org-agenda-overriding-header "Ready")
(org-agenda-remove-tags t)
))
(tags-todo "-TODO=\"WIP\"-TODO=\"READY\"" (
(tags-todo "-TODO=\"WIP\"-TODO=\"READY\"&-homework" (
(org-agenda-overriding-header "")
(org-agenda-remove-tags t)
))
@ -187,15 +195,19 @@
)
("t" "Personal (Tasks)"
(
(todo "WIP" (
(tags-todo "+homework" (
(org-agenda-overriding-header "Homework")
(org-agenda-remove-tags t)
))
(tags-todo "+TODO=\"WIP\"&-homework" (
(org-agenda-overriding-header "WIP")
(org-agenda-remove-tags t)
))
(todo "READY" (
(tags-todo "+TODO=\"READY\"&-homework" (
(org-agenda-overriding-header "Ready")
(org-agenda-remove-tags t)
))
(tags-todo "-TODO=\"WIP\"-TODO=\"READY\"" (
(tags-todo "-TODO=\"WIP\"&-TODO=\"READY\"&-homework" (
(org-agenda-overriding-header "")
(org-agenda-remove-tags t)
))
@ -229,7 +241,6 @@
))
)
)
("o" . "Photography")
)
)
)

6
org/config-org-capture.el
View File

@ -61,7 +61,7 @@
("hm" "Mike")
("hml" "Log Entry"
entry (file+datetree "~/org/health/health_mike.org" "Log")
"* %^{Timestamp}U %^{Text} %^g\n%?"
"* %^{Timestamp}U %^{Text} :health:log:%^g\n%?"
:time-prompt "t"
:immediate-finish "f"
:jump-to-captured "t"
@ -76,8 +76,8 @@
:prepend "t"
)
("hma" "Appointment Notes"
entry (file+datetree "~/org/health/health_mike.org" "Appointment Notes")
"* %^{AptTime} %^{Text} :health:appointment:%^g\n%?"
entry (file+datetree "~/org/health/health_mike.org" "Log")
"* %^{Timestamp}U %^{Text} :health:appointment:%^g\n%?"
:time-prompt "t"
:immediate-finish "f"
:jump-to-captured "t"