emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] whether in drawer?


From: Derek Feichtinger
Subject: Re: [O] whether in drawer?
Date: Thu, 28 Apr 2016 05:38:33 +0000 (UTC)
User-agent: Loom/3.14 (http://gmane.org/)

Hi

Samuel Wales <samologist <at> gmail.com> writes:

> 
> can one tell whether point is in a drawer?
> 
> 
By coincidence just posted a patch request which contains the functionality
you desire. I use org-element-at-point and then test for drawer/property drawer:

(defun org-open-if-in-drawer ()
  (let ((element (org-element-at-point)))
    (while (and element
                (not (memq (org-element-type element)
                           '(drawer property-drawer))))
      (setq element (org-element-property :parent element)))
    (when element
      (let ((pos (point)))
        (goto-char (org-element-property :begin element))
        (org-flag-drawer nil)
        (goto-char pos)))))


Cheers,
Derek




reply via email to

[Prev in Thread] Current Thread [Next in Thread]