[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/embark a6ea648cac: Give org element targets lower prior
From: |
ELPA Syncer |
Subject: |
[elpa] externals/embark a6ea648cac: Give org element targets lower priority than the active region |
Date: |
Wed, 1 Mar 2023 09:57:45 -0500 (EST) |
branch: externals/embark
commit a6ea648cac9edc06b60b9b08f9b2b2c392163bd9
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>
Give org element targets lower priority than the active region
---
embark-org.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/embark-org.el b/embark-org.el
index 7f911e96a0..a6989065b8 100644
--- a/embark-org.el
+++ b/embark-org.el
@@ -117,7 +117,10 @@
end (1- end))
collect `(,(intern (format "org-%s" (car elt))) ,target ,begin . ,end))))
-(add-to-list 'embark-target-finders 'embark-org-target-element-context)
+(if-let (((not (memq 'embark-org-target-element-context
embark-target-finders)))
+ (tail (memq 'embark-target-active-region embark-target-finders)))
+ (push 'embark-org-target-element-context (cdr tail))
+ (push 'embark-org-target-element-context embark-target-finders))
;;; Custom Org actions
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/embark a6ea648cac: Give org element targets lower priority than the active region,
ELPA Syncer <=