Merge branch 'bugfix'

This commit is contained in:
Ihor Radchenko 2022-12-10 08:49:30 +03:00
commit ca5f852750
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -5728,6 +5728,7 @@ This may be either a string or a function of two arguments:
;; Initialize communication channel in INFO.
(with-temp-buffer
(let ((org-inhibit-startup t)) (org-mode))
(org-fold-core-ignore-modifications
(let ((standard-output (current-buffer))
(org-element-use-cache nil))
(dolist (e table)
@ -5750,9 +5751,9 @@ This may be either a string or a function of two arguments:
(plist-get info :filter-parse-tree)
(org-element-map (org-element-parse-buffer) 'table
#'identity nil t)
info)))
info))
(when (and backend (symbolp backend) (not (org-export-get-backend backend)))
(user-error "Unknown :backend value"))
(user-error "Unknown :backend value"))))
(when (or (not backend) (plist-get info :raw)) (require 'ox-org))
;; Handle :skip parameter.
(let ((skip (plist-get info :skip)))