jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix: (org-agenda-ng) Add markers

Browse source 
Not sure when I broke this, but this fixes it.  Still probably need to
refactor a bit, as there's some cross-dependency between org-agenda-ng
and org-ql.
This commit is contained in:
Adam Porter 2018-08-19 12:10:12 -05:00
parent 95d51ef998
commit 22bf0ae9c0
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
org-agenda-ng.el
View file

@ -100,7 +100,8 @@ When nil, buffers are widened before being searched."
(let* ((entries (mapcar #'org-agenda-ng--format-element (let* ((entries (mapcar #'org-agenda-ng--format-element
(org-ql--query files (org-ql--query files
pred pred
:sort sort))) :sort sort
:action-fn #'org-agenda-ng--add-markers)))
(result-string (org-agenda-finalize-entries entries 'agenda)) (result-string (org-agenda-finalize-entries entries 'agenda))
(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