DL
Size: a a a
PG
DL
А
foo(bar nil)
apply(foo bar nil)
foo(bar)
apply(foo bar nil)
А
А
А
А
А
(defun my/org-todo-list-exclude-tags-advice (orig-fn &rest args)
"Exclude selected tags from `org-todo-list'.
Intended as :around advice for `org-todo-list'."
(let ((org-agenda-tag-filter-preset '("-@routine")))
(funcall orig-fn args)))
(advice-add #'org-todo-list :around #'my/org-todo-list-exclude-tags-advice)
А
PG

PG
'(()) или (list ()) вторым аргументомА
PG
PG
А
А
А
'(()) или (list ()) вторым аргументомPG