|
From: | Richard Riley |
Subject: | [Orgmode] Re: Q : select current org item as region |
Date: | Thu, 09 Sep 2010 15:03:55 +0200 |
User-agent: | Gnus/5.110011 (No Gnus v0.11) Emacs/23.2 (gnu/linux) |
Łukasz Stelmach <address@hidden> writes: > Richard Riley <address@hidden> writes: > >> What would be the best elisp way to select the current org entry? I want >> a hot key to select the current item as current region (not into the >> clipboard). >> > > This is mine: > > > > (defun stl/outline-mark-subtree () > "Mark the current subtree in an outlined document. > This puts point at the start of the current subtree, and mark at the start > of the next." > (interactive) > (let ((beg)) > (if (outline-on-heading-p) > ;; we are already looking at a heading > (beginning-of-line) > ;; else go back to previous heading > (outline-previous-visible-heading 1)) > (setq beg (point)) > (outline-end-of-subtree) > (outline-next-visible-heading 1) ; just before the next heading (stl) > (push-mark (point) nil t) > (goto-char beg))) > > > > it's derived from the original outline-mark subtree but marks an empty > space before a next-same-level-heading. Thanks for the replies. Just for google completeness (goto-char (org-entry-beginning-position)) (set-mark (org-entry-end-position)) seemed the most efficient after digging about a bit. regards r.
[Prev in Thread] | Current Thread | [Next in Thread] |