Carsten Dominik <carsten.domi...@gmail.com> wrote: > > On 25 jul 2012, at 17:39, Nick Dokos wrote: > >> ... >> On the OP's question, I'd prefer a more targeted solution: something >> like this should work (very lightly tested - check the doc for >> revert-without-query if you want to modify the regexp): >> >> --8<---------------cut here---------------start------------->8--- >> (defun xin-shi-org-revert-agenda-buffers () >> (interactive) >> (mapcar >> (lambda (file) >> (let ((revert-without-query '(".*\.org$"))) >> (find-file file) >> (revert-buffer))) >> org-agenda-files)) >> --8<---------------cut here---------------end--------------->8--- > > > The variable org-agenda-files can also contain directories. Therefore > you should use the function call > > (org-agenda-files t) > > to get a list of the files. The t means, even if the agenda > is currently restricted, get all files. >
Thanks - I forgot all about that. > Another improvement to this function would be to limit it > to files currently visited - but I guess this is a minor issue > as the next agenda command will visit all those files anyway. > Yes, I thought about that and decided it wasn't worth worrying about. As Kernighan and Plauger say: first get it right, then make it fast; and as we just saw, it wasn't right :-). But for typical setups - a few files or a few dozen files - I don't think it's going to make much difference. OTOH, if one has thousands of agenda files, then one probably has much worse problems than this. Uhhh, yes, indeed! - Carsten Nick