Fix: Free variable warning

This commit is contained in:
Adam Porter 2019-08-16 11:47:04 -05:00
parent 27e343700d
commit 62878f5d9f

View file

@ -102,7 +102,7 @@ is used, rather than binding it locally."
super-groups (plist-get ,args :super-groups)
title (plist-get ,args :title))))
(let ((files '(org-agenda-files))
query sort narrow buffer super-groups)
query sort narrow buffer super-groups title)
;; Parse args manually (so we can leave FILES nil for a default argument).
;; TODO: DRY this and org-ql, I think.
(pcase args