Fixed ControllerGen bug.
This commit is contained in:
parent
a5e7f42a26
commit
ae3a80b947
|
@ -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 New Issue