From ddbed731d2a54fcbcd34d25194e7005d71d4bec1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A9=20A=2E=20Gomes?= Date: Fri, 8 Oct 2021 18:42:09 +0300 Subject: [PATCH 29/76] Deprecate org-export-headline-levels. --- lisp/org-compat.el | 2 ++ lisp/ox-publish.el | 2 +- lisp/ox.el | 10 +++++----- 3 files changed, 8 insertions(+), 6 deletions(-) diff --git a/lisp/org-compat.el b/lisp/org-compat.el index 6c5932577..07e8ed046 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -364,6 +364,8 @@ Counting starts at 1." 'org-export-get-heading-number "9.5") (define-obsolete-function-alias 'org-export-get-parent-headline 'org-export-get-parent-heading "9.5") +(define-obsolete-variable-alias 'org-export-headline-levels + 'org-export-heading-levels "9.5") (defun org-in-fixed-width-region-p () "Non-nil if point in a fixed-width region." diff --git a/lisp/ox-publish.el b/lisp/ox-publish.el index 8ab61ad94..08052a96b 100644 --- a/lisp/ox-publish.el +++ b/lisp/ox-publish.el @@ -163,7 +163,7 @@ included. See the back-end documentation for more information. :creator `org-export-creator-string' :email `user-mail-address' :exclude-tags `org-export-exclude-tags' - :headline-levels `org-export-headline-levels' + :headline-levels `org-export-heading-levels' :language `org-export-default-language' :preserve-breaks `org-export-preserve-breaks' :section-numbers `org-export-with-section-numbers' diff --git a/lisp/ox.el b/lisp/ox.el index 74c4bc057..b109f0fee 100644 --- a/lisp/ox.el +++ b/lisp/ox.el @@ -111,7 +111,7 @@ (:select-tags "SELECT_TAGS" nil org-export-select-tags split) (:exclude-tags "EXCLUDE_TAGS" nil org-export-exclude-tags split) (:creator "CREATOR" nil org-export-creator-string) - (:headline-levels nil "H" org-export-headline-levels) + (:headline-levels nil "H" org-export-heading-levels) (:preserve-breaks nil "\\n" org-export-preserve-breaks) (:section-numbers nil "num" org-export-with-section-numbers) (:time-stamp-file nil "timestamp" org-export-time-stamp-file) @@ -508,7 +508,7 @@ t Allow export of math snippets." (const :tag "Leave math verbatim" verbatim)) :safe (lambda (x) (memq x '(t nil verbatim)))) -(defcustom org-export-headline-levels 3 +(defcustom org-export-heading-levels 3 "The last level which is still exported as a heading. Inferior levels will usually produce itemize or enumerate lists @@ -715,11 +715,11 @@ frequently in plain text." "Non-nil means create a table of contents in exported files. The table of contents contains headings with levels up to -`org-export-headline-levels'. +`org-export-heading-levels'. When this variable is set to an integer N, include levels up to N in the table of contents. Although it may then be different -from `org-export-headline-levels', it is cannot be larger than +from `org-export-heading-levels', it is cannot be larger than the number of heading levels. When nil, no table of contents is created. @@ -5272,7 +5272,7 @@ INFO is a plist used as a communication channel. When optional argument N is an integer, it specifies the depth of the table of contents. Otherwise, it is set to the value of the -last heading level. See `org-export-headline-levels' for more +last heading level. See `org-export-heading-levels' for more information. Optional argument SCOPE, when non-nil, is an element. If it is -- 2.33.0