Re: Custom agenda view - filter by priority AND scheduled date

[Barton <abubious@gmail.com>]

Thanks Matt, works like a charm! 

The final version of my org-agenda-custom-commands:

(setq org-agenda-custom-commands
      '(("c" . "Priority views")
	("ca" "#A" agenda ""
	 ((org-agenda-entry-types '(:scheduled))
	  (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "\\[#A\\]"))))
	("cb" "#B" agenda ""
	 ((org-agenda-entry-types '(:scheduled))
	  (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "\\[#B\\]"))))
	("cc" "#C" agenda ""
	 ((org-agenda-entry-types '(:scheduled))
	  (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "\\[#C\\]"))))
	;; ...other commands here
	))

The org-mode love affair goes on. =)

Barton

On Apr 28, 2010, at 20:19 , Matt Lundin wrote:

> Barton <abubious@gmail.com> writes:
> 
>> In my workflow, I move by priorities and scheduled dates for the tasks.
>> My goal with this issue is to have a view that would show me only the
>> tasks with certain priority(-ies) that are scheduled for today (or are
>> overdue, as in  (org-agenda-repeating-timestamp-show-all t) ).
>> 
>> My feeble attempt here:
>> 
>> (setq org-agenda-custom-commands
>>      '(("c" "Custom"
>>         ((agenda "" ((org-agenda-ndays 1))) 
>>          (tags-todo "+PRIORITY=\"A\"")))
>> ;; ...other commands here
>>        ))
>> 
>> ... displays a usual daily agenda and following it, _all_ the #A tasks
>> that I have. Clearly not what has been intended.
> 
> Here's one way to do it:
> 
> --8<---------------cut here---------------start------------->8---
> (setq org-agenda-custom-commands
>      '(("c" "Custom" tags-todo "+SCHEDULED<=\"<today>\"+PRIORITY=\"A\"")
> ;; ...other commands here
>        ))
> --8<---------------cut here---------------end--------------->8---
> 
> Another approach is to use the daily agenda view and a skip function.
> This is a bit faster than the first example:
> 
> --8<---------------cut here---------------start------------->8---
> (setq org-agenda-custom-commands
>      '(("c" "Custom" agenda ""
> 	 ((org-agenda-entry-types '(:scheduled))
> 	  (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp "\\[#A\\]"))))
> ;; ...other commands here
>        ))
> --8<---------------cut here---------------end--------------->8---
> 
> HTH,
> Matt