cleaning up linter rules to accurately catch errors.
This commit is contained in:
@@ -5,5 +5,8 @@
|
||||
:private-call {:level :off}
|
||||
:mount/defstate {:level :warning}}
|
||||
|
||||
:lint-as {manifold.deferred/let-flow clojure.core/let}
|
||||
:config-paths ["slingshot"]
|
||||
:hooks {:analyze-call {mount.core/defstate hooks.defstate/defstate}} }
|
||||
:hooks {:analyze-call {mount.core/defstate hooks.defstate/defstate
|
||||
auto-ap.logging/with-context-as hooks.logging/with-context-as
|
||||
auto-ap.logging/capture-context->lc hooks.logging/capture-context->lc}} }
|
||||
|
||||
18
.clj-kondo/hooks/logging.clj
Normal file
18
.clj-kondo/hooks/logging.clj
Normal file
@@ -0,0 +1,18 @@
|
||||
(ns hooks.logging
|
||||
(:require [clj-kondo.hooks-api :as api]))
|
||||
(defn with-context-as [{:keys [:node]}]
|
||||
(let [[_ _ binding & body ] (:children node)]
|
||||
{:node
|
||||
(api/list-node
|
||||
(list*
|
||||
(api/token-node 'let)
|
||||
(api/vector-node [binding {}])
|
||||
body))}))
|
||||
|
||||
(defn capture-context->lc [{:keys [:node]}]
|
||||
{:node
|
||||
(api/list-node
|
||||
(list*
|
||||
(api/token-node 'let)
|
||||
(api/vector-node [(api/token-node 'lc) {}])
|
||||
(:children node)))})
|
||||
Reference in New Issue
Block a user