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
