[elpa] scratch/org-edna 89baba4 13/72: Added chain action

[Ian Dunn]

branch: scratch/org-edna
commit 89baba47dccea0c75d187b83226f5f6194af7f55
Author: Ian D <address@hidden>
Commit: Ian D <address@hidden>

    Added chain action
    
    Chain will copy a given property from the old entry to its targets.
    
    * org-bat.el (org-bat-action/chain): New function.
---
 org-bat.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/org-bat.el b/org-bat.el
index 41c7627..2ecf883 100644
--- a/org-bat.el
+++ b/org-bat.el
@@ -374,6 +374,10 @@ IDS are all UUIDs as understood by `org-id-find'."
   (ignore last-entry)
   (org-archive-subtree-default-with-confirmation))
 
+(defun org-bat-action/chain (last-entry property)
+  (when-let ((old-prop (org-entry-get last-entry property)))
+    (org-entry-put nil property old-prop)))
+
 
 
 ;; For most conditions, we return true if condition is true and neg is false, 
or