C-M-a, C-M-e

C-M-a, C-M-e

[Jeremie Knuesel]

[-- Attachment #1.1: Type: text/plain, Size: 393 bytes --]

Hi,

A keybinding suggestion: wouldn't it make sense to have C-M-a (C-M-e) go to
the first (last) line of a top-level heading?

* top level                      <- go to this line with C-M-a
** second level
*** third level

    text...                      <- starting from here...


    more text...                 <- go to this or the next line with C-M-e

* another top level


Jeremie K.

[-- Attachment #1.2: Type: text/html, Size: 1261 bytes --]

[-- Attachment #2: Type: text/plain, Size: 204 bytes --]

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

Re: C-M-a, C-M-e

[Bastien]

Jeremie Knuesel <knuesel@gmail.com> writes:

> A keybinding suggestion: wouldn't it make sense to have C-M-a (C-M-e) go to the
> first (last) line of a top-level heading?

Here are the functions:

--8<---------------cut here---------------start------------->8---
(defun org-back-to-top-level-heading ()
  "Go back to the top-level heading."
  (interactive)
  (if (re-search-backward "^\\* " nil t)
      (goto-char (match-beginning 0))
    (message "No previous top-level heading")))

(defun org-next-top-level-heading ()
  "Go to the next top-level heading."
  (interactive)
  (if (re-search-forward "^\\* " nil t)
      (goto-char (match-beginning 0))
    (message "No next top-level heading")))
--8<---------------cut here---------------end--------------->8---

Not sure they deserve keybindings though.  

-- 
 Bastien

Re: C-M-a, C-M-e

[Carsten Dominik]

Hi Jeremie,

On Jul 31, 2009, at 2:42 AM, Bastien wrote:

> Jeremie Knuesel <knuesel@gmail.com> writes:
>
>> A keybinding suggestion: wouldn't it make sense to have C-M-a (C-M- 
>> e) go to the
>> first (last) line of a top-level heading?
>
> Here are the functions:
>
> --8<---------------cut here---------------start------------->8---
> (defun org-back-to-top-level-heading ()
>  "Go back to the top-level heading."
>  (interactive)
>  (if (re-search-backward "^\\* " nil t)
>      (goto-char (match-beginning 0))
>    (message "No previous top-level heading")))
>
> (defun org-next-top-level-heading ()
>  "Go to the next top-level heading."
>  (interactive)
>  (if (re-search-forward "^\\* " nil t)
>      (goto-char (match-beginning 0))
>    (message "No next top-level heading")))
> --8<---------------cut here---------------end--------------->8---
>
> Not sure they deserve keybindings though.


I am not convinced that top-level heading is the right paradigm for
"beginning-of-defun" in Org.  I guess that subtrees of any level
could be contenders for this as well.  So I am not implementing
this right now, but you can bind Bastien's functions to keys.

- Carsten

Re: C-M-a, C-M-e

[Jeremie Knuesel]

On Fri, Jul 31, 2009 at 2:42 AM, Bastien<bastienguerry@googlemail.com> wrote:

> Here are the functions:

Thanks!

Re: C-M-a, C-M-e

[Jeremie Knuesel]

On Mon, Aug 3, 2009 at 6:39 AM, Carsten
Dominik<carsten.dominik@gmail.com> wrote:

> I am not convinced that top-level heading is the right paradigm for
> "beginning-of-defun" in Org.  I guess that subtrees of any level
> could be contenders for this as well.  So I am not implementing
> this right now, but you can bind Bastien's functions to keys.

OK. I thought it would make sense since tree navigation is already
possible with C-c C-p, C-c C-n and C-c C-u, and I often want to jump
to the previous or next top-level entry.

Jeremie