Add explain-desc

Author: vlaaad

README.md

@@ -68,7 +68,7 @@ If you don't remember the props required by some cljfx type, or if you don't kno
 
 ### Improved error messages with spec
 
-You can set custom type->lifecycle opt that will validate all cljfx component descriptions using spec and properly describe the error:
+You can set validating type->lifecycle opt that will validate all cljfx component descriptions using spec and properly describe the errors:
 
 ```clojure
 ;; suppose you have a simple app:
@@ -124,4 +124,34 @@ You can set custom type->lifecycle opt that will validate all cljfx component de
 ;;     at cljfx.dev$ensure_valid_desc.invoke(validation.clj:58)
 ;;     at cljfx.dev$wrap_lifecycle$reify__22150.advance(validation.clj:80)
 ;;     at ...
+```
+If you already use custom type->lifecycle opt, instead of using `cljfx.dev/type->lifecycle` you can use `cljfx.dev/wrap-type->lifecycle` to wrap your type->lifecycle with validations. 
+
+Additionally, you can validate individual descriptions while developing:
+```clojure
+(cljfx.dev/explain-desc
+  {:fx/type :stage
+   :showing true
+   :scene {:fx/type :scene
+           :root {:fx/type :text-formatter
+                  :value-converter :int}}})
+;; :int - failed: #{:local-date-time :long :double :short :date-time :number :local-time :default :float :integer :byte :local-date :big-integer :boolean :character :big-decimal} in [:scene :root :value-converter]
+;; :int - failed: (instance-of javafx.util.StringConverter) in [:scene :root :value-converter]
+
+(cljfx.dev/explain-desc
+  {:fx/type :stage
+   :showing true
+   :scene {:fx/type :scene
+           :root {:fx/type :text-formatter
+                  :value-converter :integer}}})
+;; {:fx/type :text-formatter, :value-converter :integer} - failed: (desc-of (quote javafx.scene.Parent)) in [:scene :root]
+
+(cljfx.dev/explain-desc
+  {:fx/type :stage
+   :showing true
+   :scene {:fx/type :scene
+           :root {:fx/type :text-field
+                  :text-formatter {:fx/type :text-formatter
+                                   :value-converter :integer}}}})
+;; Success!
 ```

build.clj

@@ -24,6 +24,7 @@
      :target-dir class-dir})
   (b/jar {:class-dir class-dir
           :jar-file jar-file})
+  (b/git-process {:git-args ["tag" (str "v" version)]})
   (aether/deploy
     :coordinates [lib version]
     :jar-file jar-file
@@ -39,4 +40,5 @@
                                             String/valueOf)
                                         (do (print "Clojars token:")
                                             (flush)
-                                            (read-line)))))))
+                                            (read-line))))))
+  (b/git-process {:git-args ["push" "origin" (str "v" version)]}))

src/cljfx/dev.clj

@@ -344,6 +344,18 @@
   messages"
   (wrap-type->lifecycle (some-fn fx/keyword->lifecycle fx/fn->lifecycle)))
 
+(defn explain-desc
+  ([desc]
+   (explain-desc desc *type->lifecycle* *type->id*))
+  ([desc type->lifecycle]
+   (explain-desc desc type->lifecycle *type->id*))
+  ([desc type->lifecycle type->id]
+   (binding [*type->lifecycle* type->lifecycle
+             *type->id* type->id]
+     (if-let [explain-data (s/explain-data :cljfx/desc desc)]
+       (println (explain-str explain-data))
+       (println "Success!")))))
+
 ;; stretch goals
 ;; - ui reference for searching the props/types/etc
 ;; - dev cljfx type->lifecycle wrapper that adds inspector capabilities.