From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Filippo A. Salustri" Subject: Re: Re: [Orgmode] Startup page Date: Thu, 17 Mar 2011 20:03:52 -0400 Message-ID: References: <7A1717E3-E36E-490D-9432-A10B06DD7CE2@khinsen.fastmail.net> <15877.1300293916@alphaville.dokosmarshall.org> <9965.1300402136@alphaville.usa.hp.com> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=0016364d215568bc7d049eb68304 Return-path: Received: from [140.186.70.92] (port=42738 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q0NAa-0003IB-HQ for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 20:03:57 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Q0NAY-00070Q-Mr for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 20:03:56 -0400 Received: from mail-ww0-f49.google.com ([74.125.82.49]:44292) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Q0NAY-000709-E6 for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 20:03:54 -0400 Received: by wwc33 with SMTP id 33so3846549wwc.30 for ; Thu, 17 Mar 2011 17:03:53 -0700 (PDT) In-Reply-To: <9965.1300402136@alphaville.usa.hp.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --0016364d215568bc7d049eb68304 Content-Type: text/plain; charset=ISO-8859-1 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 wrote: > Matthew Sauer 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: salustri@ryerson.ca http://deseng.ryerson.ca/~fil/ --0016364d215568bc7d049eb68304 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable That's right. =A0Somewhere else in my config, I also set=A0org-agenda-window-setup to 'current-window. =A0That was the= secret ingredient for me.

Sorry I didn't bring this= up sooner. =A0I use Aquamacs, and the easiest thing for me is to use both = emacs customize and .emacs (Preferences.el in Mac-speak). =A0I set org-agen= da-window-setup in customize, but have the code I included in Preferences.e= l. =A0Makes it hard for me to remember where stuff is.

Cheers.
Fil

On 17 March 2011 18:48, Nick Dokos <nicholas.dokos@hp.com> wrote:
Matthew Sauer <improv.philosophy@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)
> =A0(insert (mapconcat (lambda (arg) (concat "[[file:" arg &q= uot;][" 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 be= havior but
> my agenda opens up 1/2 height and I have to run C-x 1 =A0to make it fu= ll
> screen after C-c a a =A0 =A0. . .now to get my next dynamic block func= tion
> (another thread to be started) working and I will have my weekly agend= a on
> one side of the screen. =A0On 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. =A0I am going to l= ook at
> Filippos' code to see if I can even make this a bit more elegant.<= br> >

The org-agenda call has the potential of messing up your carefully cr= afted window
configuration, depending on the value of org-agenda-window-setup. The defau= lt
value is reorganize-frame which should tell you something :-). You might wa= nt
to change it temporarily (or customize it to make it permanent):

=A0 (let ((org-agenda-window-setup 'current-window))
=A0 =A0 =A0(org-agenda nil "a"))

Nick



--
Filippo A. Salus= tri, Ph.D., P.Eng.
Mechanical and Industrial Engineering
Ryerson Univ= ersity
350 Victoria St, Toronto, ON
M5B 2K3, Canada
Tel: 416/979-5= 000 ext 7749
Fax: 416/979-5265
Email: salustri= @ryerson.ca
http://deseng= .ryerson.ca/~fil/
--0016364d215568bc7d049eb68304--