Change: Use --header-line-format for query headings

This commit is contained in:
Adam Porter 2022-03-20 18:48:43 -05:00
parent fd9af0aae6
commit 58ae883856

View file

@ -354,10 +354,11 @@ Searches in ELEMENT's buffer."
:level-indent org-ql-view-level-indent :level-indent org-ql-view-level-indent
:item-indent org-ql-view-item-indent :item-indent org-ql-view-item-indent
args))) args)))
(let* ((title (format "Query:%S In:%S" (let* ((title (org-ql-view--header-line-format
(or (org-ql--query-sexp-to-string query) :buffers-files buffers-or-files
(prin1-to-string query)) :query query
buffers-or-files)) ;; FIXME: View titles.
))
(items (org-ql-select buffers-or-files query (items (org-ql-select buffers-or-files query
:action 'element-with-markers :action 'element-with-markers
:sort sort)) :sort sort))