org-agenda-skip-entry-if 'notdeadline?

org-agenda-skip-entry-if 'notdeadline?

[Michael Gilbert]

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?

-- Michael

Re: org-agenda-skip-entry-if 'notdeadline?

[Carsten Dominik]

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))))))))))