diff --git a/.emacs.d/functions.org b/.emacs.d/functions.org index c8959c7..b42bcf9 100644 --- a/.emacs.d/functions.org +++ b/.emacs.d/functions.org @@ -34,14 +34,9 @@ These functions are for my org roam daily capture template. (defun jm/dt-format-link (prefix) (let ((item-name (org-entry-get nil "ITEM")) - (item-id (org-entry-get nil "ID")) - (doc-id (car (org-property-values "ID"))) + (item-id (org-id-get-create)) (doc-title (org-get-title))) - (cond ((stringp item-id) - (format "%s [[id:%s][%s]]" prefix item-id item-name)) - ((and (stringp doc-id) (stringp doc-title)) - (format "%s [[id:%s][%s - %s]]" prefix doc-id doc-title item-name)) - (nil (error "jm/dt-format-link: couldn't find a valid id"))))) + (format "%s [[id:%s][%s - %s]]" prefix item-id doc-title item-name))) #+end_src ** Queries