From e6284139d51a4419b1c5957cde7f21a0cf17b9f7 Mon Sep 17 00:00:00 2001 From: ndwarshuis Date: Sun, 12 Dec 2021 19:22:33 -0500 Subject: [PATCH] ADD agenda function to link to metablocks --- local/lib/org-x/org-x.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/local/lib/org-x/org-x.el b/local/lib/org-x/org-x.el index b0dfe67..35b5e96 100644 --- a/local/lib/org-x/org-x.el +++ b/local/lib/org-x/org-x.el @@ -1798,6 +1798,12 @@ It will clone the last entry in the selected subtree." (org-x-agenda-cmd-wrapper nil (call-interactively #'org-x-id-store-link))) +(defun org-x-agenda-id-store-link-metablock () + "Apply `org-x-id-store-link-metablock' to an agenda entry." + (interactive) + (org-x-agenda-cmd-wrapper nil + (call-interactively #'org-x-id-store-link-metablock))) + ;; agenda heading navigation functions (defun org-x-agenda--seek-heading (&optional back)