Fix `org-in-commented-heading-p'

* lisp/org.el (org-in-commented-heading-p): Fix recursive call.

http://permalink.gmane.org/gmane.emacs.orgmode/84294
This commit is contained in:
Nicolas Goaziou 2014-03-27 16:13:58 +01:00
parent 3e5fc4540b
commit 938e1ef3bf
1 changed files with 2 additions and 3 deletions

View File

@ -23311,9 +23311,8 @@ unless optional argument NO-INHERITANCE is non-nil."
(org-string-match-p (concat "^" org-comment-string "\\(?: \\|$\\)")
headline)))))
(no-inheritance nil)
(t (save-excursion
(and (org-up-heading-safe)
(org-in-commented-heading-p t))))))
(t
(save-excursion (and (org-up-heading-safe) (org-in-commented-heading-p))))))
(defun org-at-comment-p nil
"Is cursor in a line starting with a # character?"