That's right. Somewhere else in my config, I also set org-agenda-window-setup to 'current-window. That was the secret ingredient for me.
Sorry I didn't bring this up sooner. I use Aquamacs, and the easiest thing for me is to use both emacs customize and .emacs (Preferences.el in Mac-speak). I set org-agenda-window-setup in customize, but have the code I included in Preferences.el. Makes it hard for me to remember where stuff is. Cheers. Fil On 17 March 2011 18:48, Nick Dokos <nicholas.do...@hp.com> wrote: > Matthew Sauer <improv.philoso...@gmail.com> wrote: > > > > Sigh, at times it's the small things that you miss that bite you in the > > foot. > > > > (defun org-dblock-write:recently-modified (params) > > (insert (mapconcat (lambda (arg) (concat "[[file:" arg "][" arg "]]" )) > > (split-string (shell-command-to-string "ls -t > > /cygdrive/c/Dropbox/org *.org | head -10")) "\n"))) > > (org-agenda nil "a") > > (delete-other-windows) > > (split-window-horizontally) > > (find-file "/cygdrive/c/Dropbox/org/Refile.org") > > > > > > I forgot (delete-other-windows), I don't know if it the default behavior > but > > my agenda opens up 1/2 height and I have to run C-x 1 to make it full > > screen after C-c a a . . .now to get my next dynamic block function > > (another thread to be started) working and I will have my weekly agenda > on > > one side of the screen. On the tother I will have recently modified > files > > on the other, needing filed captures and Unscheduled TODO items. > > > > Thanks for all the help everyone has thrown my way. I am going to look > at > > Filippos' code to see if I can even make this a bit more elegant. > > > > The org-agenda call has the potential of messing up your carefully crafted > window > configuration, depending on the value of org-agenda-window-setup. The > default > value is reorganize-frame which should tell you something :-). You might > want > to change it temporarily (or customize it to make it permanent): > > (let ((org-agenda-window-setup 'current-window)) > (org-agenda nil "a")) > > Nick > -- Filippo A. Salustri, Ph.D., P.Eng. Mechanical and Industrial Engineering Ryerson University 350 Victoria St, Toronto, ON M5B 2K3, Canada Tel: 416/979-5000 ext 7749 Fax: 416/979-5265 Email: salus...@ryerson.ca http://deseng.ryerson.ca/~fil/
