awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-08-01 12:17:21 -05:00
Code Issues Packages Projects Releases Wiki Activity

fix org-roam-capture

Browse Source
This commit is contained in:
Jethro Kuan
2021-04-08 22:30:28 +08:00
parent d641ad4792
commit 467b165678
1 changed files with 7 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
org-roam-capture.el
View File

@ -541,17 +541,13 @@ This uses the templates defined at `org-roam-capture-templates'.
Arguments GOTO and KEYS see `org-capture'." Arguments GOTO and KEYS see `org-capture'."
(interactive "P") (interactive "P")
(let ((node (org-roam-node-read))) (let ((node (org-roam-node-read)))
;; TODO: fix this (org-roam-capture--capture :goto goto
(if (org-roam-node-id node) :keys keys
(condition-case err :info `((title . ,(org-roam-node-title node))
(org-roam-capture--capture goto keys (slug . ,(funcall org-roam-title-to-slug-function
:info `((title . ,(org-roam-node-title node)) (org-roam-node-title node)))
(slug . ,(funcall org-roam-title-to-slug-function (file . ,(org-roam-node-file node)))
(org-roam-node-title node))) :context 'capture)))
(file . ,(org-roam-node-file node)))
:context 'capture)
(error (user-error "%s. Please adjust `org-roam-capture-templates'"
(error-message-string err)))))))
(provide 'org-roam-capture) (provide 'org-roam-capture)