From 9b7fcbe5289563acde9f462495650a7aaf6b431f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A9=20A=2E=20Gomes?= Date: Sat, 9 Oct 2021 16:41:04 +0300 Subject: [PATCH 64/76] Deprecate org-odt-format-headline-function. --- lisp/org-compat.el | 2 ++ lisp/ox-odt.el | 6 +++--- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/org-compat.el b/lisp/org-compat.el index 7d2c4462a..f02f2daf2 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -418,6 +418,8 @@ Counting starts at 1." 'org-mouse-show-headings "9.5") (define-obsolete-function-alias 'org-odt-format-headline-default-function 'org-odt-format-heading-default-function "9.5") +(define-obsolete-variable-alias 'org-odt-format-headline-function + 'org-odt-format-heading-function "9.5") (define-obsolete-face-alias 'org-headline-done 'org-heading-done "9.5") (define-obsolete-face-alias 'org-headline-todo 'org-heading-todo "9.5") diff --git a/lisp/ox-odt.el b/lisp/ox-odt.el index f6c5f01a8..c33ae0941 100644 --- a/lisp/ox-odt.el +++ b/lisp/ox-odt.el @@ -105,7 +105,7 @@ (:odt-display-outline-level nil nil org-odt-display-outline-level) (:odt-fontify-srcblocks nil nil org-odt-fontify-srcblocks) (:odt-format-drawer-function nil nil org-odt-format-drawer-function) - (:odt-format-headline-function nil nil org-odt-format-headline-function) + (:odt-format-headline-function nil nil org-odt-format-heading-function) (:odt-format-inlinetask-function nil nil org-odt-format-inlinetask-function) (:odt-inline-formula-rules nil nil org-odt-inline-formula-rules) (:odt-inline-image-rules nil nil org-odt-inline-image-rules) @@ -652,7 +652,7 @@ The default value simply returns the value of CONTENTS." ;;;; Heading -(defcustom org-odt-format-headline-function +(defcustom org-odt-format-heading-function 'org-odt-format-heading-default-function "Function to format heading text. @@ -1853,7 +1853,7 @@ holding contextual information." (defun org-odt-format-heading-default-function (todo todo-type priority text tags) "Default format function for a heading. -See `org-odt-format-headline-function' for details." +See `org-odt-format-heading-function' for details." (concat ;; Todo. (when todo -- 2.33.0