diff --git a/org-ql-agenda.el b/org-ql-agenda.el
index be44798..972f59e 100644
--- a/org-ql-agenda.el
+++ b/org-ql-agenda.el
@@ -176,10 +176,10 @@ TITLE: An optional string displayed in the header."
                      (read-minibuffer "Query: ")
                      :narrow (eq current-prefix-arg '(4))
                      :groups (pcase (completing-read "Group by: "
-                                                     (cons "Don't group"
-                                                           "Global groups"
-                                                           (cl-loop for type in org-super-agenda-auto-selector-keywords
-                                                                    collect (substring (symbol-name type) 6))))
+                                                     (append (list "Don't group"
+                                                                   "Global groups")
+                                                             (cl-loop for type in org-super-agenda-auto-selector-keywords
+                                                                      collect (substring (symbol-name type) 6))))
                                ("Global groups" org-super-agenda-groups)
                                ("Don't group" nil)
                                (property (list (list (intern (concat ":auto-" property))))))