Start process of moving roam files out of roam directory

Add marginalia for org-roam modified times
This commit is contained in:
Evie Litherland-Smith 2025-02-10 16:33:59 +00:00
parent 879a0afd63
commit e7f5307499

18
init.el
View file

@ -636,15 +636,17 @@
(use-package org-roam (use-package org-roam
:if (package-installed-p 'org-roam) :if (package-installed-p 'org-roam)
:after org :after org
:defines org-roam-directory :defines (org-roam-directory
:functions org-roam-db-autosync-mode org-roam-node-annotation-function)
:functions (org-roam-db-autosync-mode
org-roam-node-file-mtime)
:bind (("C-c n r" . org-roam-capture) :bind (("C-c n r" . org-roam-capture)
("C-c n f" . org-roam-node-find) ("C-c n f" . org-roam-node-find)
:map org-mode-map :map org-mode-map
("C-c n i" . org-roam-node-insert) ("C-c n i" . org-roam-node-insert)
("C-c n l" . org-roam-buffer-toggle)) ("C-c n l" . org-roam-buffer-toggle))
:custom :custom
(org-roam-directory (expand-file-name "roam" org-directory)) (org-roam-directory org-directory)
(org-roam-extract-new-file-path "${slug}.org") (org-roam-extract-new-file-path "${slug}.org")
(org-roam-completion-everywhere t) (org-roam-completion-everywhere t)
(org-roam-node-display-template (concat (org-roam-node-display-template (concat
@ -661,7 +663,10 @@
(slot . 0) (slot . 0)
(window-width . 0.33) (window-width . 0.33)
(window-parameters . ((no-delete-other-windows . t))))) (window-parameters . ((no-delete-other-windows . t)))))
(org-roam-db-autosync-mode +1)) (org-roam-db-autosync-mode +1)
(with-eval-after-load 'marginalia
(setq org-roam-node-annotation-function (lambda (node)
(marginalia--time (org-roam-node-file-mtime node))))))
(use-package org-journal (use-package org-journal
:if (package-installed-p 'org-journal) :if (package-installed-p 'org-journal)
@ -738,7 +743,7 @@
(khalel-import-events) (khalel-import-events)
(advice-add 'appt-check (advice-add 'appt-check
:before :before
(lambda (&rest args) (lambda (&rest _)
(org-agenda-to-appt t))) (org-agenda-to-appt t)))
(appt-activate +1) (appt-activate +1)
(setq org-agenda-custom-commands (setq org-agenda-custom-commands
@ -845,7 +850,8 @@
(use-package marginalia (use-package marginalia
:if (package-installed-p 'marginalia) :if (package-installed-p 'marginalia)
:functions marginalia-mode :functions (marginalia-mode
marginalia--time)
:bind ( :map minibuffer-local-map :bind ( :map minibuffer-local-map
("M-A" . marginalia-cycle)) ("M-A" . marginalia-cycle))
:custom :custom