3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-15 16:05:17 +02:00
Code Issues Projects Releases Packages Wiki Activity

🔥 Remove debug info from worker.

Browse source
This commit is contained in:
Andrey Antukh 2020-04-23 14:47:05 +02:00
parent 5ce741ba6d
commit 9441b87d36
1 changed files with 9 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

11
frontend/src/uxbox/worker/selection.cljs
View file

@ -31,7 +31,6 @@
(defmethod impl/handler :selection/create-index (defmethod impl/handler :selection/create-index
[{:keys [file-id pages] :as message}] [{:keys [file-id pages] :as message}]
(js/console.log :selection/create-index file-id)
(letfn [(index-page [state page] (letfn [(index-page [state page]
(let [id (:id page) (let [id (:id page)
objects (get-in page [:data :objects]) objects (get-in page [:data :objects])
@ -42,24 +41,20 @@
(update-state [state] (update-state [state]
(reduce index-page state pages))] (reduce index-page state pages))]
(time (swap! state update-state)
(swap! state update-state))
nil)) nil))
(defmethod impl/handler :selection/update-index (defmethod impl/handler :selection/update-index
[{:keys [page-id objects] :as message}] [{:keys [page-id objects] :as message}]
(js/console.log :selection/update-index page-id)
(letfn [(update-page [_] (letfn [(update-page [_]
(let [objects (reduce resolve-object {} (vals objects)) (let [objects (reduce resolve-object {} (vals objects))
index (create-index objects)] index (create-index objects)]
{:index index :objects objects}))] {:index index :objects objects}))]
(time (swap! state update page-id update-page)
(swap! state update page-id update-page))
nil)) nil))
(defmethod impl/handler :selection/query (defmethod impl/handler :selection/query
[{:keys [page-id rect] :as message}] [{:keys [page-id rect] :as message}]
(time
(when-let [{:keys [index objects]} (get @state page-id)] (when-let [{:keys [index objects]} (get @state page-id)]
(let [lookup #(get objects %) (let [lookup #(get objects %)
result (-> (qdt/search index (clj->js rect)) result (-> (qdt/search index (clj->js rect))
@ -68,7 +63,7 @@
(into #{} (comp (map #(unchecked-get % "data")) (into #{} (comp (map #(unchecked-get % "data"))
(filter matches?) (filter matches?)
(map :id)) (map :id))
result))))) result))))
(defn- calculate-bounds (defn- calculate-bounds
[objects] [objects]