From: Max Mikhanosha <max@openchat.com>
To: emacs-orgmode@gnu.org
Subject: Re: [Sticky Agenda] How to create Agenda Buffers in functions
Date: Tue, 03 Apr 2012 20:23:36 -0400 [thread overview]
Message-ID: <87limc73av.wl%max@openchat.com> (raw)
In-Reply-To: <87fwckbv21.fsf@gmx.ch>
At 3 Apr 2012 19:10:30 +0200,
Sven Bretfeld wrote:
>
> Hi all
>
> The Sticky Agenda is something I have been waiting for since a long
> time. Thank you very much!
>
> I want to write a function that creates a new frame with several
> windows, each displaying a different Agenda Views. I fail to find a
> function that creates special agenda views. Formerly I used
> org-batch-agenda for similar purposes. But that doesn't work in the
> sticky branch. This is what I have:
>
> (defun my-gtd-frame ()
> (interactive)
> (save-excursion)
> (make-frame '(
> (name . "gtd")
> (active-alpha . 0.75)
> (inactive-alpha . 0.8)
> (top . 110)
> (left . 2000)
> (width . 80)
> (height . 40)
> (font . "-Adobe-Courier-Medium-R-Normal--18-180-75-75-M-110-ISO8859-1")))
> (select-frame-by-name "gtd")
> (toggle-fullscreen)
> (org-agenda-goto-today)
> (delete-other-windows)
> (split-window-horizontally)
> (other-window 1)
> (org-batch-agenda "OFFICE/NEXT")
> )
>
This is the same bug as Martyn Jago reported earlier, basically I
forgot that separate org agenda commands can be run individually
rather then through (org-agenda) function.
A temporary workaround in your specific case would be to wrap
(org-batch-agenda) call like this:
(catch 'exit
(org-batch-agenda "OFFICE/NEXT"))
I tested it and it seems to work.. The actual fix for the bug will be
similar and will be wrapping bodies of (org-todo-list) (org-tags-list)
and friends with (catch 'exit), but it needs to be done conditionally
as to only do it its called individually and not from (org-agenda)
next prev parent reply other threads:[~2012-04-04 0:23 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-04-03 17:10 [Sticky Agenda] How to create Agenda Buffers in functions Sven Bretfeld
2012-04-04 0:23 ` Max Mikhanosha [this message]
2012-04-04 5:30 ` Sven Bretfeld
2012-04-19 20:17 ` Sebastien Vauban
2012-04-20 1:39 ` Max Mikhanosha
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87limc73av.wl%max@openchat.com \
--to=max@openchat.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).