Fix compiling of namespace that include a - character.

This commit is contained in:
Alex Osborne 2009-11-22 21:34:54 +11:00 committed by Phil Hagelberg
parent 07f61f6bf6
commit 7b6acbc5af

View file

@ -11,7 +11,9 @@ unless a list of :namespaces is provided in project.clj."
;; TODO: use a java subprocess in case a different clojure version is needed
(doseq [n (or (:namespaces project)
(find-namespaces-in-dir (file (:root project) "src")))]
(let [ns-file (str (.replaceAll (name n) "\\." "/"))]
(let [ns-file (str (-> (name n)
(.replaceAll "\\." "/")
(.replaceAll "-" "_")))]
(when (> (.lastModified (file (:root project) "src" (str ns-file ".clj")))
(.lastModified (file (:root project) "classes"
(str ns-file "__init.class"))))