ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/org.el
View File

@ -7816,7 +7816,7 @@ heading, unconditionally."
;; If we are splitting, grab the text that should be moved ;; If we are splitting, grab the text that should be moved
;; to the new headline. ;; to the new headline.
(when may-split (when may-split
(if (org-on-heading-p) (if (org-at-heading-p)
;; This is a heading: split intelligently (keeping ;; This is a heading: split intelligently (keeping
;; tags). ;; tags).
(let ((pos (point))) (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) (defun org-at-heading-p (&optional ignored)
(outline-on-heading-p t)) (outline-on-heading-p t))
;; Compatibility alias with Org versions < 7.8.03 ;;; Though the function was obsoleted in 7.8.03, the byte-compiler
(defalias 'org-on-heading-p 'org-at-heading-p) ;;; 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) (defun org-in-commented-heading-p (&optional no-inheritance)
"Non-nil if point is under a commented heading. "Non-nil if point is under a commented heading.