On Wed, Sep 6, 2017 at 12:33 PM Nicolas Goaziou
wrote:
> You write a more appropriate function and use it as
> `org-agenda-skip-function'. It could re-use the following snippet:
>
> (not (member "@work" (org-split-string (org-entry-get (point)
> "ALLTAGS"
>
TIL
Thanks for the pointers. This is what I came up with:
(defun abradd-agenda-tags-inherited (tags)
(let (beg end m)
(org-back-to-heading t)
(setq beg (point)
end (progn (outline-next-heading) (1- (point
(goto-char beg)
(and
(not (member tags (org-get-tags-at)))
I think the function org-get-tags-at should also be helpful here.
Hello,
Adrian Bradd writes:
> I have the following custom agenda command:
>
> (setq org-agenda-custom-commands
> '(("ww" "Work 2 day view"
> ((agenda ""
>((org-agenda-files '("~/tmp/tmp.org"))
> (org-agenda-skip-function
Hello,
I have the following custom agenda command:
(setq org-agenda-custom-commands
'(("ww" "Work 2 day view"
((agenda ""
((org-agenda-files '("~/tmp/tmp.org"))
(org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp
":@work:"))