[code] Small elisp snippet to search among toplevel headlines in a file

[code] Small elisp snippet to search among toplevel headlines in a file

[Marc-Oliver Ihm]

Hello,

I have one big org-file for a lot of smaller projects,
each of them represented by a toplevel item.

And I have difficulties finding them quickly:
In most cases I know a buzzword from the headline;
however, if I do a search-forward I normally find
some other text within the body of an unrelated project
further above in the file; and only after several
repetitions of search I find the toplevel heading
(i.e. the project) I was looking for.

To make it easier to search only among toplevel headings
(i.e. among the the titles of my projects),
I wrote this small piece of elisp,
which lives in my initialization-file (e.g. .emacs):

(define-key org-mode-map
   [(f11)]
   (lambda () (interactive)
     (progn
       (occur (concat "^\\* .*"
                      (read-from-minibuffer
                       "Occur for toplevel headlines containing: "))
              nil)
       (pop-to-buffer "*Occur*")
       (use-local-map (copy-keymap (current-local-map)))
       (local-set-key (kbd "RET")
                      (lambda () (interactive)
                        (progn
                          (occur-mode-goto-occurrence)
                          (delete-other-windows)))))))


To find a project I just press f11 (please choose your own key) and
enter a keyword to do an occur for this keyword. Normally several toplevel
headings are found and the right one is chosen by typing return.

I hope, that someone might find this useful too.

with kind regards, Marc-Oliver Ihm

Re: [code] Small elisp snippet to search among toplevel headlines in a file

[Jude DaShiell]

Another possible idea may be to write project titles in bold while on 
headlines.  That way all you need search for is the beginning of a line 
followed by a single * followed by a blank followed by the opening mark 
for bolding and if this is only done with project titles you got yourself 
an index.On Sat, 4 Feb 2012, Marc-Oliver Ihm wrote:

> Hello,
> 
> I have one big org-file for a lot of smaller projects,
> each of them represented by a toplevel item.
> 
> And I have difficulties finding them quickly:
> In most cases I know a buzzword from the headline;
> however, if I do a search-forward I normally find
> some other text within the body of an unrelated project
> further above in the file; and only after several
> repetitions of search I find the toplevel heading
> (i.e. the project) I was looking for.
> 
> To make it easier to search only among toplevel headings
> (i.e. among the the titles of my projects),
> I wrote this small piece of elisp,
> which lives in my initialization-file (e.g. .emacs):
> 
> (define-key org-mode-map
>   [(f11)]
>   (lambda () (interactive)
>     (progn
>       (occur (concat "^\\* .*"
>                      (read-from-minibuffer
>                       "Occur for toplevel headlines containing: "))
>              nil)
>       (pop-to-buffer "*Occur*")
>       (use-local-map (copy-keymap (current-local-map)))
>       (local-set-key (kbd "RET")
>                      (lambda () (interactive)
>                        (progn
>                          (occur-mode-goto-occurrence)
>                          (delete-other-windows)))))))
> 
> 
> To find a project I just press f11 (please choose your own key) and
> enter a keyword to do an occur for this keyword. Normally several toplevel
> headings are found and the right one is chosen by typing return.
> 
> I hope, that someone might find this useful too.
> 
> with kind regards, Marc-Oliver Ihm
> 
> 
> 
> 

----------------------------------------------------------------
Jude <jdashiel-at-shellworld-dot-net>
<http://www.shellworld.net/~jdashiel/nj.html>

Re: [code] Small elisp snippet to search among toplevel headlines in a file

[Leo Alekseyev]

Another possible way to do it might be to create a wrapper around
org-goto with alternative interface where you set org-goto-max-level
to 1.  I've been using org-goto (alt. interface) with ido mode for a
while, and it's great (although I haven't tried restricting headlines
to just the top level).

On Sat, Feb 4, 2012 at 10:03 PM, Jude DaShiell <jdashiel@shellworld.net> wrote:
> Another possible idea may be to write project titles in bold while on
> headlines.  That way all you need search for is the beginning of a line
> followed by a single * followed by a blank followed by the opening mark
> for bolding and if this is only done with project titles you got yourself
> an index.On Sat, 4 Feb 2012, Marc-Oliver Ihm wrote:
>
>> Hello,
>>
>> I have one big org-file for a lot of smaller projects,
>> each of them represented by a toplevel item.
>>
>> And I have difficulties finding them quickly:
>> In most cases I know a buzzword from the headline;
>> however, if I do a search-forward I normally find
>> some other text within the body of an unrelated project
>> further above in the file; and only after several
>> repetitions of search I find the toplevel heading
>> (i.e. the project) I was looking for.
>>
>> To make it easier to search only among toplevel headings
>> (i.e. among the the titles of my projects),
>> I wrote this small piece of elisp,
>> which lives in my initialization-file (e.g. .emacs):
>>
>> (define-key org-mode-map
>>   [(f11)]
>>   (lambda () (interactive)
>>     (progn
>>       (occur (concat "^\\* .*"
>>                      (read-from-minibuffer
>>                       "Occur for toplevel headlines containing: "))
>>              nil)
>>       (pop-to-buffer "*Occur*")
>>       (use-local-map (copy-keymap (current-local-map)))
>>       (local-set-key (kbd "RET")
>>                      (lambda () (interactive)
>>                        (progn
>>                          (occur-mode-goto-occurrence)
>>                          (delete-other-windows)))))))
>>
>>
>> To find a project I just press f11 (please choose your own key) and
>> enter a keyword to do an occur for this keyword. Normally several toplevel
>> headings are found and the right one is chosen by typing return.
>>
>> I hope, that someone might find this useful too.
>>
>> with kind regards, Marc-Oliver Ihm
>>
>>
>>
>>
>
> ----------------------------------------------------------------
> Jude <jdashiel-at-shellworld-dot-net>
> <http://www.shellworld.net/~jdashiel/nj.html>
>
>