From mboxrd@z Thu Jan  1 00:00:00 1970
From: Carsten Dominik <carsten.dominik@gmail.com>
Subject: Re: org-agenda-skip-entry-if 'notdeadline?
Date: Mon, 26 Oct 2009 16:22:23 +0100
Message-ID: <77C6E01E-3FF9-4129-BED2-CD3AA1F9C753@gmail.com>
References: <B7A1A187-D9E1-49CE-81F8-DC0FE131EF5F@gilbert.org>
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: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1N2RP3-000854-3p
	for emacs-orgmode@gnu.org; Mon, 26 Oct 2009 11:22:37 -0400
Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1N2ROy-0007z4-3W
	for emacs-orgmode@gnu.org; Mon, 26 Oct 2009 11:22:36 -0400
Received: from [199.232.76.173] (port=38447 helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1N2ROw-0007yn-Mv
	for emacs-orgmode@gnu.org; Mon, 26 Oct 2009 11:22:30 -0400
Received: from mail-ew0-f206.google.com ([209.85.219.206]:35585)
	by monty-python.gnu.org with esmtp (Exim 4.60)
	(envelope-from <carsten.dominik@gmail.com>) id 1N2ROw-0003ez-AU
	for emacs-orgmode@gnu.org; Mon, 26 Oct 2009 11:22:30 -0400
Received: by ewy2 with SMTP id 2so12572843ewy.31
	for <emacs-orgmode@gnu.org>; Mon, 26 Oct 2009 08:22:28 -0700 (PDT)
In-Reply-To: <B7A1A187-D9E1-49CE-81F8-DC0FE131EF5F@gilbert.org>
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=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: Michael Gilbert <mcg@gilbert.org>
Cc: org-mode Mailinglist <emacs-orgmode@gnu.org>


On Oct 26, 2009, at 5:49 AM, Michael Gilbert wrote:

> Hi --
>
> Still trying to figure out how to show only (current) deadlines in  
> my agenda. I use org-agenda-skip-entry-if 'notdeadline but that  
> still seems to include all the scheduled items who have deadlines  
> (some time in the future, but not currently). I apologize for  
> missing something obvious, but ... any advice?
>

(setq org-agenda-custom-commands
       '(("d" "Due today" agenda ""
          ((org-deadline-warning-days 0)
           (org-agenda-skip-scheduled-if-deadline-is-shown t)
           (org-agenda-skip-function
            (lambda ()
              (let* ((dl (org-entry-get nil "DEADLINE")))
                (if (or (not dl)
                        (equal dl "")
                        (org-time> dl (org-time-today)))
                    (progn (outline-next-heading) (point))))))))))