From 6a7aee2c3575feaa355621bf47183b340ce881ea Mon Sep 17 00:00:00 2001 From: Ihor Radchenko Date: Wed, 3 May 2023 14:33:48 +0200 Subject: [PATCH] org-texinfo--normalize-headlines: Use `org-element-create' --- lisp/ox-texinfo.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/ox-texinfo.el b/lisp/ox-texinfo.el index 461acd292..5ed3f51f7 100644 --- a/lisp/ox-texinfo.el +++ b/lisp/ox-texinfo.el @@ -502,9 +502,7 @@ Return new tree." (let ((first (org-element-map contents '(headline section) #'identity info t))) (unless (org-element-type-p first 'section) - (apply #'org-element-set-contents - hl - (cons `(section (:parent ,hl)) contents))))))) + (org-element-create 'section nil contents)))))) info) tree)