branch: externals/embark
commit 81c924ca555ceeb9dd1fec221ff5aa5d2bca242d
Merge: fa5a59cf55 e0bb5b342d
Author: Omar Antolín Camarena <omar.anto...@gmail.com>
Commit: GitHub <nore...@github.com>
Merge pull request #561 from minad/autoload-embark
Auto load Org integration
---
embark-org.el | 9 +++------
embark.el | 3 +++
2 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/embark-org.el b/embark-org.el
index 8c601dad5e..46ce7702a5 100644
--- a/embark-org.el
+++ b/embark-org.el
@@ -31,6 +31,7 @@
(require 'embark)
(require 'org)
+(require 'org-element)
;;; Basic target finder for Org
@@ -99,8 +100,6 @@
)
"Supported Org object and element types.")
-(declare-function org-element-property "org-element" (property element))
-
(defun embark-org-target-element-context ()
"Target the smallest Org element or object around point."
(when-let (((derived-mode-p 'org-mode 'org-agenda-mode))
@@ -289,10 +288,8 @@ what part or in what format the link is copied."
(embark-org-define-link-copier description description "'s description")
(embark-org-define-link-copier target target "'s target")
-(declare-function embark-org-copy-link-inner-target "embark-org")
-(fset 'embark-org-copy-link-inner-target 'kill-new)
-(put 'embark-org-copy-link-inner-target 'function-documentation
- "Copy 'inner part' of the Org link at point's target.
+(defalias 'embark-org-copy-link-inner-target #'kill-new
+ "Copy 'inner part' of the Org link at point's target.
For mailto and elisp links, the inner part is the portion of the
target after 'mailto:' or 'elisp:'.
diff --git a/embark.el b/embark.el
index 76af12670a..3d8619ea90 100644
--- a/embark.el
+++ b/embark.el
@@ -4299,4 +4299,7 @@ library, which have an obvious notion of associated
directory."
(unless (require 'embark-consult nil 'noerror)
(warn "The package embark-consult should be installed if you use both
Embark and Consult")))
+(with-eval-after-load 'org
+ (require 'embark-org))
+
;;; embark.el ends here
