awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-09-18 16:06:49 -05:00
Code Issues Packages Projects Releases Wiki Activity

title: replace link with description on db-build

Browse Source
This commit is contained in:
Jethro Kuan
2021-04-28 13:54:12 +08:00
parent dd7c3fab23
commit ca1b02829b
1 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
org-roam-db.el
View File

@@ -270,9 +270,10 @@ If UPDATE-P is non-nil, first remove the file in the database."
(when (= (org-outline-level) 0) (when (= (org-outline-level) 0)
(when-let ((id (org-id-get))) (when-let ((id (org-id-get)))
(let* ((file (buffer-file-name (buffer-base-buffer))) (let* ((file (buffer-file-name (buffer-base-buffer)))
(title (or (cadr (assoc "TITLE" (org-collect-keywords '("title")) (title (org-link-display-format
#'string-equal)) (or (cadr (assoc "TITLE" (org-collect-keywords '("title"))
(file-relative-name file org-roam-directory))) #'string-equal))
(file-relative-name file org-roam-directory))))
(pos (point)) (pos (point))
(todo nil) (todo nil)
(priority nil) (priority nil)
@@ -333,7 +334,7 @@ If UPDATE-P is non-nil, first remove the file in the database."
(level (nth 1 heading-components)) (level (nth 1 heading-components))
(scheduled (org-roam-db-get-scheduled-time)) (scheduled (org-roam-db-get-scheduled-time))
(deadline (org-roam-db-get-deadline-time)) (deadline (org-roam-db-get-deadline-time))
(title (nth 4 heading-components))) (title (org-link-display-format (nth 4 heading-components))))
(condition-case nil (condition-case nil
(org-roam-db-query (org-roam-db-query
[:insert :into nodes [:insert :into nodes