diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index ae900c2..e9b50b4 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -870,6 +870,11 @@ otherwise." (unless template-pom (user-error "Cannot find template via TEMPLATE_ID property or top-most sibling")) + (insert "\nBacklinks (not DONE, all parents, no archives):\n\n") + (org-dblock-write:db/org-backlinks '(:org-ql-match (not (done)) + :parent-depth nil + :archive nil)) + (insert "\n\nTemplate:\n") (db/org-copy-body-from-item-to-point template-pom))) (defun db/org-copy-body-from-item-to-point (pom)