From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Filippo A. Salustri" Subject: Re: manipulating the agenda from elisp? Date: Thu, 7 Apr 2011 23:53:15 -0400 Message-ID: References: <87bp0h2z80.fsf@norang.ca> Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=0016367faf9b65757204a0602a99 Return-path: Received: from [140.186.70.92] (port=48329 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q82l4-0004Wl-Eo for emacs-orgmode@gnu.org; Thu, 07 Apr 2011 23:53:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Q82l2-0003yE-P6 for emacs-orgmode@gnu.org; Thu, 07 Apr 2011 23:53:18 -0400 Received: from mail-ww0-f49.google.com ([74.125.82.49]:58763) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Q82l2-0003yA-IC for emacs-orgmode@gnu.org; Thu, 07 Apr 2011 23:53:16 -0400 Received: by wwb39 with SMTP id 39so3264695wwb.30 for ; Thu, 07 Apr 2011 20:53:15 -0700 (PDT) In-Reply-To: <87bp0h2z80.fsf@norang.ca> 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: Bernt Hansen Cc: emacs-orgmode@gnu.org --0016367faf9b65757204a0602a99 Content-Type: text/plain; charset=ISO-8859-1 That's a good start! Thanks! Cheers. Fil On 7 April 2011 23:34, Bernt Hansen wrote: > "Filippo A. Salustri" writes: > > > Hi, > > I'm thinking I might like to try some programming to do things to the > > agenda from an elisp function. > > I tried 'apropos agenda' but I didn't really see the kind of thing > > I'm looking for. > > What I'm hoping is for some way to iterate over each item in the > > agenda, and be able to access the content of the item in some > > structured way. > > I think I've seen functions that can pull info like TODO state and > > priority from the item under the cursor, so it's the iteration part > > that I'm really interested in. > > > > Any advice? > > Hi Fil, > > I just found the B f code to execute an arbitrary function on marked > entries in the agenda. Maybe this will help? > > This following code visits the marked entries and just displays the > heading for the task. > > Mark multiple entries in the agenda with 'm' and then 'B f bh/test RET' > should display the heading of each marked task in the *Messages* buffer. > > --8<---------------cut here---------------start------------->8--- > (defun bh/test () > (interactive) > (let* ((marker (or (org-get-at-bol 'org-marker) > (org-agenda-error))) > (buffer (marker-buffer marker)) > (pos (marker-position marker))) > (with-current-buffer buffer > (if (org-mode-p) > (save-excursion > (goto-char pos) > (message "%s" (nth 4 (org-heading-components)))))))) > --8<---------------cut here---------------end--------------->8--- > > Depending on what you want to do you can either act on marked entries or > create a custom agenda skip function that can visit the tasks as the > agenda is built. > > HTH, > Bernt > -- 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/ --0016367faf9b65757204a0602a99 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable That's a good start! =A0Thanks!
Cheers.
Fil

On 7 April 2011 23:34, Bernt Hansen = <bernt@norang.ca> wrote= :
"Filippo A. Salustri= " <salustri@ryerson.ca&g= t; writes:

> Hi,
> I'm thinking I might like to try some programming to do things to = the
> agenda from an elisp function.
> I tried 'apropos agenda' but I didn't really see the kind = of thing
> I'm looking for.
> What I'm hoping is for some way to iterate over each item in the > agenda, and be able to access the content of the item in some
> structured way.
> I think I've seen functions that can pull info like TODO state and=
> priority from the item under the cursor, so it's the iteration par= t
> that I'm really interested in.
>
> Any advice?

Hi Fil,

I just found the B f code to execute an arbitrary function on marked
entries in the agenda. =A0Maybe this will help?

This following code visits the marked entries and just displays the
heading for the task.

Mark multiple entries in the agenda with 'm' and then 'B f bh/t= est RET'
should display the heading of each marked task in the *Messages* buffer.
--8<---------------cut here---------------start------------->8---
(defun bh/test ()
=A0(interactive)
=A0(let* ((marker (or (org-get-at-bol 'org-marker)
=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 (org-agenda-error)))
=A0 =A0 =A0 =A0 (buffer (marker-buffer marker))
=A0 =A0 =A0 =A0 (pos (marker-position marker)))
=A0 =A0(with-current-buffer buffer
=A0 =A0 =A0(if (org-mode-p)
=A0 =A0 =A0 =A0 =A0(save-excursion
=A0 =A0 =A0 =A0 =A0 =A0(goto-char pos)
=A0 =A0 =A0 =A0 =A0 =A0(message "%s" (nth 4 (org-heading-compone= nts))))))))
--8<---------------cut here---------------end--------------->8---

Depending on what you want to do you can either act on marked entries or create a custom agenda skip function that can visit the tasks as the
agenda is built.

HTH,
Bernt



--
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/
--0016367faf9b65757204a0602a99--