From 7b487e1bc3497a2f01d5324155a8405e236ae123 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Tue, 28 Dec 2021 22:43:10 +0100
Subject: [PATCH] :paperclip: Fix unrelated linter issues.

---
 .clj-kondo/config.edn                                |  1 -
 frontend/src/app/main/data/workspace/transforms.cljs |  2 +-
 frontend/src/app/main/ui/components/fullscreen.cljs  |  2 +-
 frontend/src/app/util/forms.cljs                     | 11 +++++------
 frontend/src/app/util/http.cljs                      |  4 ++--
 frontend/src/app/util/time.cljs                      |  4 ++--
 6 files changed, 11 insertions(+), 13 deletions(-)

diff --git a/.clj-kondo/config.edn b/.clj-kondo/config.edn
index 4ba5b0442..5fc380845 100644
--- a/.clj-kondo/config.edn
+++ b/.clj-kondo/config.edn
@@ -10,7 +10,6 @@
  {:analyze-call
   {app.common.data/export hooks.export/export
    potok.core/reify hooks.export/potok-reify
-   cljs.core/specify! hooks.export/clojure-specify
    app.util.services/defmethod hooks.export/service-defmethod
    }}
 
diff --git a/frontend/src/app/main/data/workspace/transforms.cljs b/frontend/src/app/main/data/workspace/transforms.cljs
index 24598b1a6..9862703ae 100644
--- a/frontend/src/app/main/data/workspace/transforms.cljs
+++ b/frontend/src/app/main/data/workspace/transforms.cljs
@@ -368,7 +368,7 @@
             (assoc-in [:workspace-local :transform] :resize)))
 
       ptk/WatchEvent
-      (watch [it state stream]
+      (watch [_ state stream]
         (let [initial-position @ms/mouse-position
               stoper  (rx/filter ms/mouse-up? stream)
               layout  (:workspace-layout state)
diff --git a/frontend/src/app/main/ui/components/fullscreen.cljs b/frontend/src/app/main/ui/components/fullscreen.cljs
index 95bae7d49..ff06bcbbe 100644
--- a/frontend/src/app/main/ui/components/fullscreen.cljs
+++ b/frontend/src/app/main/ui/components/fullscreen.cljs
@@ -31,7 +31,7 @@
            (specify! state
              cljs.core/IFn
              (-invoke
-               ([it val]
+               ([_ val]
                 (if val
                   (wapi/request-fullscreen (mf/ref-val container))
                   (wapi/exit-fullscreen)))))))]
diff --git a/frontend/src/app/util/forms.cljs b/frontend/src/app/util/forms.cljs
index c97e384fc..177770bc0 100644
--- a/frontend/src/app/util/forms.cljs
+++ b/frontend/src/app/util/forms.cljs
@@ -85,31 +85,30 @@
       (mf/ref-val state-ref))
 
     IReset
-    (-reset! [it new-value]
+    (-reset! [_ new-value]
       (if (nil? new-value)
         (mf/set-ref-val! state-ref (get-state))
         (mf/set-ref-val! state-ref new-value))
       (render inc))
 
     ISwap
-    (-swap! [self f]
+    (-swap! [_ f]
       (let [f (wrap-update-fn f opts)]
         (mf/set-ref-val! state-ref (f (mf/ref-val state-ref)))
         (render inc)))
 
 
-    (-swap! [self f x]
+    (-swap! [_ f x]
       (let [f (wrap-update-fn f opts)]
         (mf/set-ref-val! state-ref (f (mf/ref-val state-ref) x))
         (render inc)))
 
-
-    (-swap! [self f x y]
+    (-swap! [_ f x y]
       (let [f (wrap-update-fn f opts)]
         (mf/set-ref-val! state-ref (f (mf/ref-val state-ref) x y))
         (render inc)))
 
-    (-swap! [self f x y more]
+    (-swap! [_ f x y more]
       (let [f (wrap-update-fn f opts)]
         (mf/set-ref-val! state-ref (apply f (mf/ref-val state-ref) x y more))
         (render inc)))))
diff --git a/frontend/src/app/util/http.cljs b/frontend/src/app/util/http.cljs
index 151311994..3ba2280fc 100644
--- a/frontend/src/app/util/http.cljs
+++ b/frontend/src/app/util/http.cljs
@@ -27,12 +27,12 @@
 (extend-protocol IBodyData
   globals/FormData
   (-get-body-data [it] it)
-  (-update-headers [it headers]
+  (-update-headers [_ headers]
     (dissoc headers "content-type" "Content-Type"))
 
   default
   (-get-body-data [it] it)
-  (-update-headers [it headers] headers))
+  (-update-headers [_ headers] headers))
 
 (defn translate-method
   [method]
diff --git a/frontend/src/app/util/time.cljs b/frontend/src/app/util/time.cljs
index c0a28ffa1..9004f90f2 100644
--- a/frontend/src/app/util/time.cljs
+++ b/frontend/src/app/util/time.cljs
@@ -157,11 +157,11 @@
 
 (extend-protocol IPrintWithWriter
   DateTime
-  (-pr-writer [p writer opts]
+  (-pr-writer [p writer _]
     (-write writer (str/fmt "#stks/datetime \"%s\"" (format p :iso))))
 
   Duration
-  (-pr-writer [p writer opts]
+  (-pr-writer [p writer _]
     (-write writer (str/fmt "#stks/duration \"%s\"" (format p :iso)))))
 
 (defn- resolve-format