max/doom-config
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

WIP: khalel sync

Browse Source
This commit is contained in:
Max Schlueter 2024-02-11 19:58:30 +01:00
parent 07c8e15411
commit 5c37f99702
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gtd.el
View File

@ -6,7 +6,7 @@
org-agenda-files (mapcar (lambda (filename) (expand-file-name filename org-directory)) org-agenda-files (mapcar (lambda (filename) (expand-file-name filename org-directory))
'("gtd/inbox.org" '("gtd/inbox.org"
"gtd/tasks.org" "gtd/tasks.org"
"caldav/personal.org" ;; synced by org-caldav "caldav/personal.org" ;; synced by khalel
"gtd/journal.org"))) "gtd/journal.org")))
;; (file-expand-wildcards (concat org-directory "gtd/*.org")))) ;; (file-expand-wildcards (concat org-directory "gtd/*.org"))))
;; org-agenda-files (append (mapcar 'file-truename ;; org-agenda-files (append (mapcar 'file-truename
@ -33,7 +33,6 @@
;; org-refile-target-verify-function nil ;; org-refile-target-verify-function nil
;; org-refile-targets '(("tasks.org" . (:maxlevel . 2)))) ;; org-refile-targets '(("tasks.org" . (:maxlevel . 2))))
org-refile-targets `(("tasks.org" . (:maxlevel . 2)) org-refile-targets `(("tasks.org" . (:maxlevel . 2))
(,(expand-file-name "caldav/personal.org" org-directory) . (:level . 0))
(,(expand-file-name "gtd/someday.org" org-directory) . (:maxlevel . 1))))) (,(expand-file-name "gtd/someday.org" org-directory) . (:maxlevel . 1)))))
;; Getting the following on capture: ;; Getting the following on capture:
@ -185,11 +184,16 @@ the current import date range."
:config :config
(advice-add #'khalel--insert-import-file-header :override #'max/khalel--insert-import-file-header) (advice-add #'khalel--insert-import-file-header :override #'max/khalel--insert-import-file-header)
(advice-add #'khalel-import-events :around #'doom-shut-up-a) (advice-add #'khalel-import-events :around #'doom-shut-up-a)
;; HACK: Getting an error message otherwise:
;; org-element--list-struct: Tab width in Org files must be 8, not 4. Please adjust your ‘tab-width’ settings for Org mode.
;; TODO: Set tab width for org mode only
(setq-default tab-width 8)
(setq khalel-default-calendar "personal" (setq khalel-default-calendar "personal"
khalel-import-org-file-confirm-overwrite nil khalel-import-org-file-confirm-overwrite nil
khalel-import-start-date "-15d" khalel-import-start-date "-15d"
khalel-import-end-date "+30d" khalel-import-end-date "+30d"
khalel-import-org-file (expand-file-name "gtd/calendar.org" org-directory) khalel-import-org-file (expand-file-name "caldav/personal.org" org-directory)
khalel-import-format "* {title} {cancelled} :{calendar}:\n\ khalel-import-format "* {title} {cancelled} :{calendar}:\n\
:PROPERTIES:\n:CALENDAR: {calendar}\n\ :PROPERTIES:\n:CALENDAR: {calendar}\n\
:LOCATION: {location}\n\ :LOCATION: {location}\n\