Displaying your Org agenda after idle time

Displaying your Org agenda after idle time

[John Wiegley]

I have the following snippet in my .emacs file, which I find very useful.  Basically what it does is that if I don't touch my Emacs for 5 minutes, it displays the current agenda.  This keeps my tasks "always in mind" whenever I come back to Emacs after doing something else, whereas before I had a tendency to forget that it was there.

John

(defun jump-to-org-agenda ()
  (interactive)
  (let ((buf (get-buffer "*Org Agenda*"))
	wind)
    (if buf
	(if (setq wind (get-buffer-window buf))
	    (select-window wind)
	  (if (called-interactively-p)
	      (progn
		(select-window (display-buffer buf t t))
		(org-fit-window-to-buffer)
		;; (org-agenda-redo)
		)
	    (with-selected-window (display-buffer buf)
	      (org-fit-window-to-buffer)
	      ;; (org-agenda-redo)
	      )))
      (call-interactively 'org-agenda-list)))
  ;;(let ((buf (get-buffer "*Calendar*")))
  ;;  (unless (get-buffer-window buf)
  ;;    (org-agenda-goto-calendar)))
  )

(run-with-idle-timer 300 t 'jump-to-org-agenda)

Re: Displaying your Org agenda after idle time

[Jason Dunsmore]

I've been searching for a good way to remember to look at my agenda.
Great idea!

Re: Displaying your Org agenda after idle time

[Ross A. Laird]

John Wiegley <jwiegley@gmail.com> writes:

> I have the following snippet in my .emacs file, which I find very
> useful. Basically what it does is that if I don't touch my Emacs for 5
> minutes, it displays the current agenda. This keeps my tasks "always
> in mind" whenever I come back to Emacs after doing something else,
> whereas before I had a tendency to forget that it was there.
>
> John
>
> (defun jump-to-org-agenda ()
>   (interactive)
>   (let ((buf (get-buffer "*Org Agenda*"))
> 	wind)
>     (if buf
> 	(if (setq wind (get-buffer-window buf))
> 	    (select-window wind)
> 	  (if (called-interactively-p)
> 	      (progn
> 		(select-window (display-buffer buf t t))
> 		(org-fit-window-to-buffer)
> 		;; (org-agenda-redo)
> 		)
> 	    (with-selected-window (display-buffer buf)
> 	      (org-fit-window-to-buffer)
> 	      ;; (org-agenda-redo)
> 	      )))
>       (call-interactively 'org-agenda-list)))
>   ;;(let ((buf (get-buffer "*Calendar*")))
>   ;;  (unless (get-buffer-window buf)
>   ;;    (org-agenda-goto-calendar)))
>   )
>
> (run-with-idle-timer 300 t 'jump-to-org-agenda)
>

This is fantastically useful.
Thanks very much!

Ross

--
Ross A. Laird, PhD
www.rosslaird.com

Re: Re: Displaying your Org agenda after idle time

[Alan E. Davis]

I like this also.  It would be fantastic if the agenda were displayed,
as it is now, while a simple keystroke would return one to the point
he was at when the function was called.   I might one day have time to
try to figure out how to do this, not saying I would be able to do so
easily.

Alan Davis

On Sun, Mar 21, 2010 at 9:45 PM, Ross A. Laird <ross@rosslaird.com> wrote:
> John Wiegley <jwiegley@gmail.com> writes:
>
>> I have the following snippet in my .emacs file, which I find very
>> useful. Basically what it does is that if I don't touch my Emacs for 5
>> minutes, it displays the current agenda. This keeps my tasks "always
>> in mind" whenever I come back to Emacs after doing something else,
>> whereas before I had a tendency to forget that it was there.
>>
>> John
>>
>> (defun jump-to-org-agenda ()
>>   (interactive)
>>   (let ((buf (get-buffer "*Org Agenda*"))
>>       wind)
>>     (if buf
>>       (if (setq wind (get-buffer-window buf))
>>           (select-window wind)
>>         (if (called-interactively-p)
>>             (progn
>>               (select-window (display-buffer buf t t))
>>               (org-fit-window-to-buffer)
>>               ;; (org-agenda-redo)
>>               )
>>           (with-selected-window (display-buffer buf)
>>             (org-fit-window-to-buffer)
>>             ;; (org-agenda-redo)
>>             )))
>>       (call-interactively 'org-agenda-list)))
>>   ;;(let ((buf (get-buffer "*Calendar*")))
>>   ;;  (unless (get-buffer-window buf)
>>   ;;    (org-agenda-goto-calendar)))
>>   )
>>
>> (run-with-idle-timer 300 t 'jump-to-org-agenda)
>>
>
> This is fantastically useful.
> Thanks very much!
>
> Ross
>
> --
> Ross A. Laird, PhD
> www.rosslaird.com
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>

Re: Re: Displaying your Org agenda after idle time

[Carsten Dominik]

On Mar 23, 2010, at 6:15 AM, Alan E. Davis wrote:

> I like this also.  It would be fantastic if the agenda were displayed,
> as it is now, while a simple keystroke would return one to the point
> he was at when the function was called.   I might one day have time to
> try to figure out how to do this, not saying I would be able to do so
> easily.

Basically:

Use a variable to store the (current-window-configuration) and then  
have a
separate function restoring that configuration using set-window- 
configuration.

- Carsten

>
> Alan Davis
>
> On Sun, Mar 21, 2010 at 9:45 PM, Ross A. Laird <ross@rosslaird.com>  
> wrote:
>> John Wiegley <jwiegley@gmail.com> writes:
>>
>>> I have the following snippet in my .emacs file, which I find very
>>> useful. Basically what it does is that if I don't touch my Emacs  
>>> for 5
>>> minutes, it displays the current agenda. This keeps my tasks "always
>>> in mind" whenever I come back to Emacs after doing something else,
>>> whereas before I had a tendency to forget that it was there.
>>>
>>> John
>>>
>>> (defun jump-to-org-agenda ()
>>>   (interactive)
>>>   (let ((buf (get-buffer "*Org Agenda*"))
>>>       wind)
>>>     (if buf
>>>       (if (setq wind (get-buffer-window buf))
>>>           (select-window wind)
>>>         (if (called-interactively-p)
>>>             (progn
>>>               (select-window (display-buffer buf t t))
>>>               (org-fit-window-to-buffer)
>>>               ;; (org-agenda-redo)
>>>               )
>>>           (with-selected-window (display-buffer buf)
>>>             (org-fit-window-to-buffer)
>>>             ;; (org-agenda-redo)
>>>             )))
>>>       (call-interactively 'org-agenda-list)))
>>>   ;;(let ((buf (get-buffer "*Calendar*")))
>>>   ;;  (unless (get-buffer-window buf)
>>>   ;;    (org-agenda-goto-calendar)))
>>>   )
>>>
>>> (run-with-idle-timer 300 t 'jump-to-org-agenda)
>>>
>>
>> This is fantastically useful.
>> Thanks very much!
>>
>> Ross
>>
>> --
>> Ross A. Laird, PhD
>> www.rosslaird.com
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten

RE: Displaying your Org agenda after idle time

[Marvin Doyley]

[-- Attachment #1.1: Type: text/plain, Size: 43 bytes --]

This is an awesome function.

Thanks
M





[-- Attachment #1.2: Type: text/html, Size: 755 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode