branch: externals/embark
commit 9b17d9a63b6960e026ad3c09a7871e0a3364e926
Author: Omar Antolín Camarena <omar.anto...@gmail.com>
Commit: Omar Antolín Camarena <omar.anto...@gmail.com>

    Add key bindings for setting and deleting Org properties
---
 embark-org.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/embark-org.el b/embark-org.el
index 0f672b4666..06cb9a2c61 100644
--- a/embark-org.el
+++ b/embark-org.el
@@ -355,6 +355,8 @@ bound to i."
   "t" #'org-todo
   "," #'org-priority
   ":" #'org-set-tags-command
+  "P" #'org-set-property
+  "D" #'org-delete-property
   "k" #'org-cut-subtree
   "N" #'org-narrow-to-subtree
   "l" #'org-metaleft
@@ -370,8 +372,9 @@ bound to i."
                org-shiftmetaleft org-shiftmetaright org-cycle org-shifttab))
   (cl-pushnew cmd embark-repeat-actions))
 
-(cl-pushnew 'embark--ignore-target
-            (alist-get 'org-set-tags-command embark-target-injection-hooks))
+(dolist (cmd '(org-set-tags-command org-set-property org-delete-property))
+  (cl-pushnew 'embark--ignore-target
+              (alist-get cmd embark-target-injection-hooks)))
 
 (add-to-list 'embark-keymap-alist '(org-heading embark-org-heading-map))
 

Reply via email to