From 0c7b60c48506fa096d94d53b16cff00c9276235d Mon Sep 17 00:00:00 2001
From: Tienson Qin <tiensonqin@gmail.com>
Date: Mon, 28 Dec 2020 20:37:52 +0800
Subject: [PATCH] fix(query-dsl): journals pages not works

---
 src/main/frontend/components/block.cljs |  7 ++++---
 src/main/frontend/db/query_dsl.cljs     | 12 ++++++------
 2 files changed, 10 insertions(+), 9 deletions(-)

diff --git a/src/main/frontend/components/block.cljs b/src/main/frontend/components/block.cljs
index 1c49b08ea..7ea015a0b 100644
--- a/src/main/frontend/components/block.cljs
+++ b/src/main/frontend/components/block.cljs
@@ -659,9 +659,10 @@
       (cond
         (= name "query")
         [:div.dsl-query
-         (custom-query (assoc config :dsl-query? true)
-                       {:title [:code.p-1 (str "Query: " (first arguments))]
-                        :query (first arguments)})]
+         (let [query (string/join "," arguments)]
+           (custom-query (assoc config :dsl-query? true)
+                         {:title [:code.p-1 (str "Query: " query)]
+                          :query query}))]
 
         (= name "youtube")
         (let [url (first arguments)]
diff --git a/src/main/frontend/db/query_dsl.cljs b/src/main/frontend/db/query_dsl.cljs
index 43fe681e0..310d82ee2 100644
--- a/src/main/frontend/db/query_dsl.cljs
+++ b/src/main/frontend/db/query_dsl.cljs
@@ -119,12 +119,12 @@
                  t/days)]
         (tc/to-long (t/plus (t/today) (tf duration)))))))
 
-(defn uniq-symbol
-  [counter prefix]
-  (let [result (symbol (str prefix (when-not (zero? @counter)
-                                     @counter)))]
-    (swap! counter inc)
-    result))
+#_(defn uniq-symbol
+    [counter prefix]
+    (let [result (symbol (str prefix (when-not (zero? @counter)
+                                       @counter)))]
+      (swap! counter inc)
+      result))
 
 (defn build-query
   ([repo e env]