From mboxrd@z Thu Jan 1 00:00:00 1970 From: Konrad Hinsen Subject: Re: org google weather Date: Sun, 6 Mar 2011 12:20:08 +0100 Message-ID: <9FCA50E5-1338-43DC-81F2-A9EF184468C8@fastmail.net> References: <87oc5rlwc4.wl%lists@700c.org> <4D70A577.4000509@manor-farm.org> <80k4gfnth7.fsf@somewhere.org> <4D70CCB6.5080101@manor-farm.org> <8736.1299256681@alphaville.dokosmarshall.org> <4427.1299270361@alphaville.usa.hp.com> <8739n1j2ec.fsf@gnu.org> <874o7hfqc1.fsf@gnu.org> <529E07B0-65BD-4235-A8DA-69F2D8938462@fastmail.net> <10316.1299369084@alphaville.dokosmarshall.org> <90C021BE-F916-4C6B-B041-F2FCB859443D@fastmail.net> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from [140.186.70.92] (port=36662 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PwC0b-0002nF-08 for emacs-orgmode@gnu.org; Sun, 06 Mar 2011 06:20:22 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PwC0Y-0003fw-7t for emacs-orgmode@gnu.org; Sun, 06 Mar 2011 06:20:19 -0500 Received: from smtp3-g21.free.fr ([212.27.42.3]:41284) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PwC0X-0003e4-L8 for emacs-orgmode@gnu.org; Sun, 06 Mar 2011 06:20:18 -0500 In-Reply-To: <90C021BE-F916-4C6B-B041-F2FCB859443D@fastmail.net> 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: nicholas.dokos@hp.com, Bastien , Org Mode Mailing List On 6 Mar 2011, at 11:33, Konrad Hinsen wrote: > Fortunately, because apparently org-agenda-skip-function is not > called for diary-style entries. But I'll continue exploring that > approach for other types of entries. That was relatively easy as well: (defun org-agenda-day-view-only-filter () (let ((subtree-end (save-excursion (org-end-of-subtree t))) (day-view-only (org-entry-get nil "day-view-only" t))) (if day-view-only (if (eq span 'day) nil subtree-end) nil))) (setq org-agenda-skip-function-global 'org-agenda-day-view-only-filter) The agenda items eliminated from the week views are marked with: :PROPERTIES: :day-view-only: t :END: I put the filter on the global skip function, but others may prefer to use a custom agenda view. Konrad.