Browse Source

Revert "lisp/org-agenda.el: Let tags-todo searches include DONE keywords"

This reverts commit 823f9744e9f6c58b6f5459e161a8501ec03603a3.
Bastien 4 năm trước cách đây
mục cha
commit
a34d71560b
1 tập tin đã thay đổi với 2 bổ sung2 xóa
  1. 2 2
      lisp/org-agenda.el

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