if `sort' is not a list, existing code will always return true
This commit is contained in:
parent
fa1e3354b6
commit
4256e89ff4
1 changed files with 1 additions and 1 deletions
|
|
@ -242,7 +242,7 @@ returns nil or non-nil."
|
||||||
(pcase sort
|
(pcase sort
|
||||||
(`nil items)
|
(`nil items)
|
||||||
((or 'date 'deadline 'scheduled 'todo 'priority 'random
|
((or 'date 'deadline 'scheduled 'todo 'priority 'random
|
||||||
(guard (cl-loop for elem in sort
|
(guard (cl-loop for elem in (-list sort)
|
||||||
always (memq elem '(date deadline scheduled todo priority random)))))
|
always (memq elem '(date deadline scheduled todo priority random)))))
|
||||||
;; Default sorting functions
|
;; Default sorting functions
|
||||||
(org-ql--sort-by items (-list sort)))
|
(org-ql--sort-by items (-list sort)))
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue