fix: Desktop App fails to render images that are on newline

close #2317
This commit is contained in:
Tienson Qin
2021-06-29 20:58:47 +08:00
parent eee9ed5113
commit 3cfdbd6655
2 changed files with 24 additions and 27 deletions

View File

@@ -293,28 +293,26 @@
(when-let [cache (get @query-state related-key)]
(let [{:keys [query inputs transform-fn query-fn inputs-fn]} cache]
(when (or query query-fn)
(let [new-result (profile
"takes"
(->
(cond
query-fn
(profile
"Query:"
(doall (query-fn db)))
(let [new-result (->
(cond
query-fn
(profile
"Query:"
(doall (query-fn db)))
inputs-fn
(let [inputs (inputs-fn)]
(apply d/q query db inputs))
inputs-fn
(let [inputs (inputs-fn)]
(apply d/q query db inputs))
(keyword? query)
(db-utils/get-key-value repo-url query)
(keyword? query)
(db-utils/get-key-value repo-url query)
(seq inputs)
(apply d/q query db inputs)
(seq inputs)
(apply d/q query db inputs)
:else
(d/q query db))
transform-fn))]
:else
(d/q query db))
transform-fn)]
(set-new-result! related-key new-result)))))))))
(defn transact-react!