Merge: 0.4.8

This commit is contained in:
Adam Porter 2020-11-18 04:14:01 -06:00
commit dbf5dd3b0b
3 changed files with 85 additions and 65 deletions

View file

@ -1659,7 +1659,7 @@ PREDICATES is a list of one or more sorting methods, including:
;; Put at end of list if not found
(1+ (length org-todo-keywords-1)))))))
(-flatten-n 1 (-map #'cdr sorted-groups)))))
(cl-loop for pred in (nreverse predicates)
(cl-loop for pred in (reverse predicates)
do (setq items (if (eq pred 'todo)
(sort-by-todo-keyword items)
(-sort (sorter pred) items)))