aciceri/nixfleet
1
0
Fork 0
Code Issues Pull requests 1 Projects Releases Packages Wiki Activity Actions

Org-roam changes
Some checks are pending
/ test (push) Waiting to run
Details

Browse source
This commit is contained in:
Andrea Ciceri 2025-05-23 21:08:53 +02:00
parent 6cd58095e4
commit 8e28001eab
No known key found for this signature in database
1 changed files with 5 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
hmModules/emacs/init.el
View file

@ -945,20 +945,14 @@ This is meant to be an helper to be called from the window manager."
(org-roam-capture-ref-templates (org-roam-capture-ref-templates
'( '(
("r" "Web entry" entry ("r" "Web entry" entry
"* ${Title} \n:PROPERTIES:\n:URL: ${ref}\n:END:\n %i" "** %i \n:PROPERTIES:\n:URL: ${ref}\n:END:"
:target (file+head "daily/%<%Y-%m-%d>.org" "#+TITLE: %<%Y-%m-%d>") :target (file+olp "inbox.org" ("Web entries"))
:create-id t) :create-id t)
) )
) )
:config :config
(org-roam-db-autosync-mode) (org-roam-db-autosync-mode)
;; In order to automatically add an org id for some capture templates (using the :create-id keyword)
(defun ccr/org-capture-maybe-create-id ()
(when (org-capture-get :create-id)
(org-id-get-create)))
(add-hook 'org-capture-mode-hook #'ccr/org-capture-maybe-create-id)
;; The following functions name are relevant because org-roam-ql columns in queries use their suffix ;; The following functions name are relevant because org-roam-ql columns in queries use their suffix
(defun org-roam-node-spent (node) (defun org-roam-node-spent (node)
"Return the hours spent as number" "Return the hours spent as number"
@ -989,7 +983,9 @@ This is meant to be an helper to be called from the window manager."
(query (if (and date-start date-end) (query (if (and date-start date-end)
`(and ,query-tags (date-range ,date-start ,date-end)) `(and ,query-tags (date-range ,date-start ,date-end))
query-tags))) query-tags)))
(apply #'+(mapcar #'org-roam-node-spent (org-roam-ql-nodes query)))))) (apply #'+(mapcar #'org-roam-node-spent (org-roam-ql-nodes query)))))
:bind
(("C-c n i" . org-roam-node-insert)))
(use-package org-roam-ql (use-package org-roam-ql
:after org-roam :after org-roam