📎 Fix linter issues

This commit is contained in:
Andrey Antukh 2022-07-28 09:53:51 +02:00
parent b3415d0d52
commit 7a3f1a36e9
4 changed files with 6 additions and 5 deletions

View file

@ -35,6 +35,7 @@
[app.main.data.workspace.fix-bool-contents :as fbc] [app.main.data.workspace.fix-bool-contents :as fbc]
[app.main.data.workspace.groups :as dwg] [app.main.data.workspace.groups :as dwg]
[app.main.data.workspace.guides :as dwgu] [app.main.data.workspace.guides :as dwgu]
[app.main.data.workspace.highlight :as dwh]
[app.main.data.workspace.interactions :as dwi] [app.main.data.workspace.interactions :as dwi]
[app.main.data.workspace.layers :as dwly] [app.main.data.workspace.layers :as dwly]
[app.main.data.workspace.layout :as layout] [app.main.data.workspace.layout :as layout]
@ -45,7 +46,6 @@
[app.main.data.workspace.path.shapes-to-path :as dwps] [app.main.data.workspace.path.shapes-to-path :as dwps]
[app.main.data.workspace.persistence :as dwp] [app.main.data.workspace.persistence :as dwp]
[app.main.data.workspace.selection :as dws] [app.main.data.workspace.selection :as dws]
[app.main.data.workspace.highlight :as dwh]
[app.main.data.workspace.shape-layout :as dwsl] [app.main.data.workspace.shape-layout :as dwsl]
[app.main.data.workspace.shapes :as dwsh] [app.main.data.workspace.shapes :as dwsh]
[app.main.data.workspace.state-helpers :as wsh] [app.main.data.workspace.state-helpers :as wsh]

View file

@ -7,6 +7,7 @@
(ns app.main.data.workspace.highlight (ns app.main.data.workspace.highlight
(:require (:require
[app.common.spec :as us] [app.common.spec :as us]
[clojure.set :as set]
[potok.core :as ptk])) [potok.core :as ptk]))
;; --- Manage shape's highlight status ;; --- Manage shape's highlight status
@ -17,7 +18,7 @@
(ptk/reify ::highlight-shape (ptk/reify ::highlight-shape
ptk/UpdateEvent ptk/UpdateEvent
(update [_ state] (update [_ state]
(update-in state [:workspace-local :highlighted] clojure.set/union #{id})))) (update-in state [:workspace-local :highlighted] set/union #{id}))))
(defn dehighlight-shape (defn dehighlight-shape
[id] [id]

View file

@ -151,13 +151,13 @@
on-pointer-enter on-pointer-enter
(mf/use-fn (mf/use-fn
(mf/deps id) (mf/deps id)
(fn [event] (fn [_event]
(st/emit! (dw/highlight-shape id)))) (st/emit! (dw/highlight-shape id))))
on-pointer-leave on-pointer-leave
(mf/use-fn (mf/use-fn
(mf/deps id) (mf/deps id)
(fn [event] (fn [_event]
(st/emit! (dw/dehighlight-shape id)))) (st/emit! (dw/dehighlight-shape id))))
on-context-menu on-context-menu

View file

@ -6,9 +6,9 @@
(ns app.main.ui.workspace.viewport.outline (ns app.main.ui.workspace.viewport.outline
(:require (:require
[app.common.data :as d]
[app.common.exceptions :as ex] [app.common.exceptions :as ex]
[app.common.geom.shapes :as gsh] [app.common.geom.shapes :as gsh]
[app.common.data :as d]
[app.util.object :as obj] [app.util.object :as obj]
[app.util.path.format :as upf] [app.util.path.format :as upf]
[clojure.set :as set] [clojure.set :as set]