From a4d8ab34c9d9a3f8d773d43116fabab7b5efeeea Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A9=20A=2E=20Gomes?= Date: Fri, 8 Oct 2021 23:18:07 +0300 Subject: [PATCH 45/76] Deprecate org-indent-notify-modified-headline. --- lisp/org-compat.el | 2 ++ lisp/org-indent.el | 8 ++++---- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/org-compat.el b/lisp/org-compat.el index 6038930fa..806f132a8 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -390,6 +390,8 @@ Counting starts at 1." 'org-icalendar-blocked-heading-p "9.5") (define-obsolete-variable-alias 'org-indent-modified-headline-flag 'org-indent-modified-heading-flag "9.5") +(define-obsolete-function-alias 'org-indent-notify-modified-headline + 'org-indent-notify-modified-heading "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/org-indent.el b/lisp/org-indent.el index 561870717..c2b9a9daa 100644 --- a/lisp/org-indent.el +++ b/lisp/org-indent.el @@ -73,7 +73,7 @@ Delay used when the buffer to initialize isn't current.") This is used locally in each buffer being initialized.") (defvar org-indent-modified-heading-flag nil "Non-nil means the last deletion operated on a heading. -It is modified by `org-indent-notify-modified-headline'.") +It is modified by `org-indent-notify-modified-heading'.") (defcustom org-indent-boundary-char ?\s @@ -193,7 +193,7 @@ during idle time." #'org-indent-remove-properties-from-string)) (add-hook 'after-change-functions 'org-indent-refresh-maybe nil 'local) (add-hook 'before-change-functions - 'org-indent-notify-modified-headline nil 'local) + 'org-indent-notify-modified-heading nil 'local) (and font-lock-mode (org-restart-font-lock)) (org-indent-remove-properties (point-min) (point-max)) ;; Submit current buffer to initialize agent. If it's the first @@ -222,7 +222,7 @@ during idle time." #'org-indent-remove-properties-from-string)) (remove-hook 'after-change-functions 'org-indent-refresh-maybe 'local) (remove-hook 'before-change-functions - 'org-indent-notify-modified-headline 'local) + 'org-indent-notify-modified-heading 'local) (org-with-wide-buffer (org-indent-remove-properties (point-min) (point-max))) (and font-lock-mode (org-restart-font-lock)) @@ -375,7 +375,7 @@ stopped." (looking-at-p org-property-end-re) (looking-at-p org-property-re)))))))))))) -(defun org-indent-notify-modified-headline (beg end) +(defun org-indent-notify-modified-heading (beg end) "Set `org-indent-modified-heading-flag' depending on context. BEG and END are the positions of the beginning and end of the -- 2.33.0