From 9cbfb89e146fd3411b75808a60f109e14894f72d Mon Sep 17 00:00:00 2001 From: Kjetil Orbekk Date: Thu, 30 Dec 2021 17:00:22 -0500 Subject: org --- emacs/.doom.d/config.el | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) (limited to 'emacs') diff --git a/emacs/.doom.d/config.el b/emacs/.doom.d/config.el index aa08eca..f2396bf 100644 --- a/emacs/.doom.d/config.el +++ b/emacs/.doom.d/config.el @@ -73,7 +73,7 @@ (setq org-log-into-drawer t) (setq org-agenda-log-mode-items '(closed clock state)) (setq org-roam-directory (concat org-directory "/roam")) -(setq org-agenda-files (list org-roam-directory)) +(setq org-agenda-files (list (concat org-roam-directory "/todo.org"))) (setq org-roam-db-location (concat org-roam-directory "/org-roam.db")) (setq org-export-with-toc nil) (setq deft-directory org-directory) @@ -84,6 +84,22 @@ (defvar kj/publish-tag "publish") (defvar kj/publish-directory "/ssh:orbekk@dragon.orbekk.com:/storage/srv/kj.orbekk.com") +(setq org-journal-file-type 'weekly) +(setq org-journal-dir org-roam-directory) +(setq org-journal-file-format "journal-%Y-%m-%d.org") +(setq org-journal-enable-agenda-integration t) +(defun kj/org-file-level-id-get-create () + (interactive) + (save-excursion + (goto-char (point-min)) + (org-id-get-create))) + +(defun kj/org-journal-file-header (time) + (format-time-string "#+title: Week of %F (%W)\n" + (org-journal--convert-time-to-file-type-time time))) +(setq org-journal-file-header #'kj/org-journal-file-header) +(add-hook 'org-journal-after-entry-create-hook 'kj/org-file-level-id-get-create) + ;; Allow more keys when navigating with avy. (setq avy-keys '(?a ?o ?e ?u ?d ?h ?n ?s ?l ?, ?. ?p ?r)) (setq avy-timeout-seconds 0.3) -- cgit v1.2.3