diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 3da0967f0..892d88a77 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3348,7 +3348,7 @@ s   Search for keywords                 M   Like m, but only TODO entries
 	      (`agenda
 	       (call-interactively 'org-agenda-list))
 	      (`agenda*
-	       (funcall 'org-agenda-list nil nil t))
+	       (funcall 'org-agenda-list nil nil nil t))
 	      (`alltodo
 	       (call-interactively 'org-todo-list))
 	      (`search