mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-21 06:55:35 +00:00
Code

orgtbl-to-generic: Honor `org-export-filter-parse-tree-functions'

Browse Source 
* lisp/org-table.el (orgtbl-to-generic): Before e0924db3c,
`orgtbl-to-generic' did honor the filter functions for AST
specifically (but no other).  Keep it so.
This commit is contained in:
Ihor Radchenko 2024-07-13 15:21:07 +02:00
parent 4f6aab244f
commit f5c5e0d912
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-table.el
View File

@ -5840,6 +5840,8 @@ This may be either a string or a function of two arguments:
;; We disable the usual pre-processing and post-processing,
;; i.e., hooks, Babel code evaluation, and macro expansion.
;; Only backend specific filters are retained.
;; We _do not_ disable `org-export-filter-parse-tree-functions'
;; (historically).
(let ((org-export-before-processing-functions nil)
(org-export-replace-macros nil)
(org-export-use-babel nil)
@ -5847,7 +5849,9 @@ This may be either a string or a function of two arguments:
(org-export-process-citations nil)
(org-export-expand-links nil)
(org-export-filter-parse-tree-functions
'(orgtbl--skip orgtbl--skipcols))
(append
'(orgtbl--skip orgtbl--skipcols)
org-export-filter-parse-tree-functions))
(org-export-filters-alist
'((:filter-parse-tree . org-export-filter-parse-tree-functions))))
(when (or (not backend) (plist-get params :raw)) (require 'ox-org))