Fix: Sorting

By using s-join instead of org-agenda-finalize-entries, which does its
own sorting.  We don't need anything it does, at least not now, and if
we ever do, we'll probably want to reimplement it, anyway.

HOWEVER, this breaks org-super-agenda, which uses advice to that
function to group items.  So we need to either figure out another
approach (which I have been unable to do so far, trying cl-letf,
cl-flet, and advice-add with unwind-protect), or make this depend on
org-super-agenda.
This commit is contained in:
Adam Porter 2018-08-19 14:01:59 -05:00
parent 2001c88ed5
commit 9cce826bfe

View file

@ -110,7 +110,7 @@ When nil, buffers are widened before being searched."
pred pred
:sort sort :sort sort
:action-fn #'org-agenda-ng--add-markers))) :action-fn #'org-agenda-ng--add-markers)))
(result-string (org-agenda-finalize-entries entries 'agenda)) (result-string (s-join "\n" entries))
(target-buffer (get-buffer-create "test-agenda-ng"))) (target-buffer (get-buffer-create "test-agenda-ng")))
(with-current-buffer target-buffer (with-current-buffer target-buffer
(read-only-mode -1) (read-only-mode -1)