FIX use filetags when no non-node parents available

This commit is contained in:
Nathan Dwarshuis 2022-04-22 19:02:47 -04:00
parent 39b4d1e351
commit b584f6ed9c
1 changed files with 2 additions and 3 deletions

View File

@ -524,9 +524,8 @@ used for optimization."
this-file-links))))
(when this-tags
(setq this-tags (split-string this-tags ":")))
(when (and (not node-stack) bare-stack)
(setq this-tags (->> (car bare-stack)
(nth 1)
(unless node-stack
(setq this-tags (->> (or (nth 1 (car bare-stack)) org-file-tags)
(append this-tags))))
(->> (list :point this-point
:buffer-parent this-buffer-parent