org.el: mark `org-on-heading-p' obsolete.

* lisp/org.el (org-on-heading-p): Mark obsolete.
This commit is contained in:
Aaron Ecay 2015-11-06 12:17:19 +00:00
parent 8b4672bdd0
commit a6768538d6
1 changed files with 5 additions and 3 deletions

View File

@ -7816,7 +7816,7 @@ heading, unconditionally."
;; If we are splitting, grab the text that should be moved
;; to the new headline.
(when may-split
(if (org-on-heading-p)
(if (org-at-heading-p)
;; This is a heading: split intelligently (keeping
;; tags).
(let ((pos (point)))
@ -24135,8 +24135,10 @@ This version does not only check the character property, but also
(defun org-at-heading-p (&optional ignored)
(outline-on-heading-p t))
;; Compatibility alias with Org versions < 7.8.03
(defalias 'org-on-heading-p 'org-at-heading-p)
;;; Though the function was obsoleted in 7.8.03, the byte-compiler
;;; warning was only added in Org 9.0, which should be taken into
;;; account when deciding when to remove the alias.
(define-obsolete-function-alias 'org-on-heading-p 'org-at-heading-p "Org 7.8.03")
(defun org-in-commented-heading-p (&optional no-inheritance)
"Non-nil if point is under a commented heading.