branch: externals/denote
commit 87f5bb12a4ac3a3b8db07f969ea67b8930796673
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>

    Make 'denote-backlinks' Org dynamic block accept :id-only parameter
---
 denote-org-dblock.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/denote-org-dblock.el b/denote-org-dblock.el
index 494cc05b97..0c2e257e0a 100644
--- a/denote-org-dblock.el
+++ b/denote-org-dblock.el
@@ -72,7 +72,7 @@ Used by `org-dblock-update' with PARAMS provided by the 
dynamic block."
 (defun denote-org-dblock-insert-backlinks ()
   "Insert new Org dynamic block to include backlinks."
   (interactive)
-  (org-create-dblock (list :name "denote-backlinks"))
+  (org-create-dblock (list :name "denote-backlinks" :id-only nil))
   (org-update-dblock))
 
 (org-dynamic-block-define "denote-backlinks" 
'denote-org-dblock-insert-backlinks)
@@ -83,7 +83,7 @@ Used by `org-dblock-update' with PARAMS provided by the 
dynamic block."
   (when-let ((file (buffer-file-name))
              (id (denote-retrieve-filename-identifier file))
              (files (delete file (denote--retrieve-files-in-xrefs id))))
-    (insert (denote-link--prepare-links files file nil))
+    (insert (denote-link--prepare-links files file (plist-get params 
:id-only)))
     (join-line))) ; remove trailing empty line
 
 ;;;; Dynamic block to insert entire file contents

Reply via email to