Fix linting with new clj-kondo (#31)

* Fix linting with new clj-kondo * Better solution to bypass map type check
aroemers · Sep 29, 2024 · f0307ae · f0307ae
1 parent 4615d63
commit f0307ae
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 5 deletions.
diff --git a/.clj-kondo/config.edn b/.clj-kondo/config.edn
@@ -0,0 +1 @@
+{:config-paths ["../resources/clj-kondo.exports/functionalbytes/mount-lite"]}
diff --git a/.gitignore b/.gitignore
@@ -11,6 +11,4 @@ pom.xml.asc
 .hg/
 /mount-lite.iml
 .idea/
-/.lsp
-/.clj-kondo/*
-/!.clj-kondo/config.edn
+.cache
diff --git a/resources/clj-kondo.exports/functionalbytes/mount-lite/hooks/lite.clj b/resources/clj-kondo.exports/functionalbytes/mount-lite/hooks/lite.clj
@@ -16,10 +16,10 @@
         hmap (exprs-map args)]
     (when-not (contains? hmap :start)
       (throw (ex-info "missing :start expression" {})))
-    `(def ~name ~hmap)))
+    `(def ~name (mount.lite/map->State ~hmap))))
 
 (defmacro state [& args]
   (let [hmap (exprs-map args)]
     (when-not (contains? hmap :start)
       (throw (ex-info "missing :start expression" {})))
-    hmap))
+    `(mount.lite/map->State ~hmap)))
diff --git a/src/mount/lite.clj b/src/mount/lite.clj
@@ -211,3 +211,9 @@
                                    (stop)))))
                 (.start))
       :result p#}))
+
+(comment
+  (def x 1)
+  (defstate foo :start (fn [] x))
+  @foo
+  )
Original file line number	Diff line number	Diff line change
		@@ -0,0 +1 @@
		{:config-paths ["../resources/clj-kondo.exports/functionalbytes/mount-lite"]}