summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien <bzg@gnu.org>2021-05-17 07:18:35 +0200
committerBastien <bzg@gnu.org>2021-05-17 07:18:35 +0200
commita34d71560bd95b2879b2dd2f0b94d773e0b4e18c (patch)
treef0bc7a70a7b50713fdfbd34c5e435046e266d1bd
parent823f9744e9f6c58b6f5459e161a8501ec03603a3 (diff)
downloadorg-mode-a34d71560bd95b2879b2dd2f0b94d773e0b4e18c.tar.gz
Revert "lisp/org-agenda.el: Let tags-todo searches include DONE keywords"
This reverts commit 823f9744e9f6c58b6f5459e161a8501ec03603a3.
-rw-r--r--lisp/org-agenda.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 7dfba55..3bcfde2 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -2929,7 +2929,7 @@ Pressing `<' twice means to restrict to the current subtree or region
((eq type 'tags)
(org-let lprops '(org-tags-view current-prefix-arg org-match)))
((eq type 'tags-todo)
- (org-let lprops '(org-tags-view nil org-match)))
+ (org-let lprops '(org-tags-view '(4) org-match)))
((eq type 'todo)
(org-let lprops '(org-todo-list org-match)))
((eq type 'tags-tree)
@@ -3265,7 +3265,7 @@ s Search for keywords M Like m, but only TODO entries
'(org-tags-view current-prefix-arg match)))
((eq type 'tags-todo)
(org-let2 gprops lprops
- '(org-tags-view nil match)))
+ '(org-tags-view '(4) match)))
((eq type 'todo)
(org-let2 gprops lprops
'(org-todo-list match)))