From 2b0007a808f370a68f48431515d4aa26d7d1338d Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 26 Nov 2021 11:40:28 +0100 Subject: [PATCH] ox: Add autoload cookies * lisp/ox.el (org-export-derived-backend-p): (org-export-data): (org-export-raw-string): Autoload function. These functions are required at runtime by some other libraries (e.g., "oc-basic.el"), which cannot require `ox' because of circular dependencies. In particular, this fixes . --- lisp/ox.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/ox.el b/lisp/ox.el index 9ab813a1b..b27ec56c0 100644 --- a/lisp/ox.el +++ b/lisp/ox.el @@ -1048,6 +1048,7 @@ BACKEND is a structure with `org-export-backend' type." (unless (org-export-backend-p backend) (error "Unknown \"%s\" back-end: Aborting export" backend))) +;;;###autoload (defun org-export-derived-backend-p (backend &rest backends) "Non-nil if BACKEND is derived from one of BACKENDS. BACKEND is an export back-end, as returned by, e.g., @@ -1858,6 +1859,7 @@ INFO is a plist containing export directives." (let ((transcoder (cdr (assq type (plist-get info :translate-alist))))) (and (functionp transcoder) transcoder))))) +;;;###autoload (defun org-export-data (data info) "Convert DATA into current back-end format. @@ -4586,6 +4588,7 @@ objects of the same type." ;; `org-export-raw-string' builds a pseudo-object out of a string ;; that any export back-end returns as-is. +;;;###autoload (defun org-export-raw-string (s) "Return a raw object containing string S. A raw string is exported as-is, with no additional processing