tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Widen buffers for multi-occur 

Bernt Hansen writes:

> The org-agenda multi-occur search command (C-c a /) does not return
> results on buffers that are currently narrowed if the search would
> normally match outside the narrowed region.  This prevents possible
> matches from being displayed.
This commit is contained in:
Carsten Dominik 2009-11-19 14:25:02 +01:00
parent 2d511abb73
commit 9bc97e6f16
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2009-11-19 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-occur-in-agenda-files): Make sure none of the
buffers is narrowed.
* org-habit.el (org-is-habit-p): Add doc string.
2009-11-18 Carsten Dominik <carsten.dominik@gmail.com>

7
lisp/org.el
View File

@ -16663,7 +16663,12 @@ really on, so that the block visually is on the match."
(add-to-list 'files f 'append)
(add-to-list 'tnames (file-truename f) 'append)))
(multi-occur
(mapcar (lambda (x) (or (get-file-buffer x) (find-file-noselect x))) files)
(mapcar (lambda (x)
(with-current-buffer
(or (get-file-buffer x) (find-file-noselect x))
(widen)
(current-buffer)))
files)
regexp)))
(if (boundp 'occur-mode-find-occurrence-hook)