Fixed ControllerGen bug.
This commit is contained in:
parent
a5e7f42a26
commit
ae3a80b947
2 changed files with 5 additions and 1 deletions
|
@ -29,3 +29,6 @@ out/
|
|||
.nrepl-port
|
||||
*~
|
||||
.idea/
|
||||
|
||||
syntax: glob
|
||||
*.xml
|
||||
|
|
|
@ -107,7 +107,8 @@
|
|||
|
||||
(defn gen-fx-controller-class [fxmlpath clj-fn]
|
||||
(let [clj-fn (if (symbol? clj-fn)
|
||||
(str (namespace clj-fn) "/" (name clj-fn)))
|
||||
(str (namespace clj-fn) "/" (name clj-fn))
|
||||
clj-fn)
|
||||
fxmlzip (zip-tree-seq (xml/parse (io/input-stream fxmlpath)))
|
||||
clazz (get-controller-class fxmlzip)
|
||||
[pkg classname] (reverse (map str/reverse (str/split (str/reverse clazz) #"\." 2)))
|
||||
|
|
Loading…
Reference in a new issue