branch: elpa/gnosis
commit 356657cf521eaac7023ec5e904a462272e4f9a47
Author: Thanos Apollo <[email protected]>
Commit: Thanos Apollo <[email protected]>
[fix] output-tags: Use a single db call for tag output.
* Use cl-loop to compute the output once per tag, then reuse it for
both the id and vector.
---
gnosis-dashboard.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/gnosis-dashboard.el b/gnosis-dashboard.el
index 9fc28fffeb..ef6ebefdca 100644
--- a/gnosis-dashboard.el
+++ b/gnosis-dashboard.el
@@ -475,8 +475,9 @@ If IDS is not provided, use current themata being
displayed."
(tabulated-list-init-header)
(setq tabulated-list-entries
(cl-loop for tag in tags
- collect (list (car (gnosis-dashboard-output-tag tag))
- (vconcat (gnosis-dashboard-output-tag tag)))))
+ for output = (gnosis-dashboard-output-tag tag)
+ collect (list (car output)
+ (vconcat output))))
(tabulated-list-print t)))
(defun gnosis-dashboard-output-deck (id)
