emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [Orgmode] Speed commands


From: Dan Davison
Subject: Re: [Orgmode] Speed commands
Date: Sat, 14 Nov 2009 00:03:25 -0500
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1 (gnu/linux)

Carsten Dominik <address@hidden> writes:

<...>
> I am happy to have a discussion what additional
> commands should be present by default.

I thought a speed command for scrolling through an org document might be
good -- move from heading to heading, displaying the next entry while
keeping all others hidden, and close subtrees as you leave them. Or is
there already an org command that does something like this?

(Try starting with everything closed.)

--------------------------------------------------------------
(defun ded/org-show-next-heading-tidily ()
  "Show next entry, keeping other entries closed."
  (if (save-excursion (end-of-line) (outline-invisible-p))
      (org-cycle)
    (let ((level (org-current-level)))
      (unless (org-heading-has-child-p) (org-cycle))
      (outline-next-heading)
      (if (< (org-current-level) level)
          (save-excursion
            (outline-backward-same-level 1)
            (org-cycle)))
      (if (and (bolp) (org-on-heading-p))
          (org-cycle)
        (outline-up-heading 1 t)
        (org-cycle)
        (error "Boundary reached")))))

(setq org-use-speed-commands t)
(add-to-list 'org-speed-commands-user 
             '("s" ded/org-show-next-heading-tidily))
--------------------------------------------------------------

(<space> might be quite natural for this one, it seems to get used for
scrolling e.g. in dired and gnus)

Dan


>
> - Carsten
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode




reply via email to

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