[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] Re: Speed commands
From: |
Dan Davison |
Subject: |
Re: [Orgmode] Re: Speed commands |
Date: |
Sat, 14 Nov 2009 10:48:00 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.1 (gnu/linux) |
Benjamin Andresen <address@hidden> writes:
> Hey Dan,
>
> Dan Davison <address@hidden> writes:
>
>> (unless (org-heading-has-child-p) (org-cycle))
>
> There is no function by the name of org-heading-has-child-p in the
> current org-mode tree. I'd like to try the above code.
Thanks Benny.
Here's a new version. There could also be a reverse direction version if
people think this might be useful.
-----------------------------------------------------------
(defun ded/org-show-next-heading-tidily ()
"Show next entry, keeping all other entries closed."
(if (save-excursion (end-of-line) (outline-invisible-p))
(org-cycle)
(let ((pos (point))
(level (org-current-level))
(next-level
(progn (outline-next-heading) (org-current-level))))
(cond ((< next-level level)
(save-excursion
(outline-backward-same-level 1) (org-cycle)))
((= next-level level)
(save-excursion (goto-char pos) (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
'(" " ded/org-show-next-heading-tidily))
-----------------------------------------------------------
Dan
>
>>
>> Dan
>
> br,
> benny
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
- Re: [Orgmode] Release 6.33, (continued)
- Re: [Orgmode] Release 6.33, Daniel Clemente, 2009/11/13
- Re: [Orgmode] Release 6.33, Eric S Fraga, 2009/11/13
- Re: [Orgmode] Speed commands, Dan Davison, 2009/11/14
- [Orgmode] Re: Speed commands, Benjamin Andresen, 2009/11/15
- Re: [Orgmode] Speed commands, Carsten Dominik, 2009/11/15
- [Orgmode] Re: Speed commands, J. David Boyd, 2009/11/17
- [Orgmode] Re: Speed commands, J. David Boyd, 2009/11/17
- Re: [Orgmode] Re: Speed commands, Dan Davison, 2009/11/17
- Re: [Orgmode] Re: Speed commands, Carsten Dominik, 2009/11/17
- Re: [Orgmode] Speed commands, Jason Dunsmore, 2009/11/18
- Re: [Orgmode] Speed commands, Carsten Dominik, 2009/11/18
- Re: [Orgmode] Speed commands (was: Release 6.33), Friedrich Delgado Friedrichs, 2009/11/20