Compile :main even if not explicitly listed in :namespaces.

This commit is contained in:
Phil Hagelberg 2010-02-12 12:44:32 -08:00
parent 14f9691e0a
commit aaf60f6da0

View file

@ -13,12 +13,14 @@
"Returns a seq of the namespaces that are compilable, regardless of whether
their class files are present and up-to-date."
[project]
;; TODO: Compile :main ns if needed
(cond
(let [nses (set (cond
(coll? (:namespaces project))
(:namespaces project)
(= :all (:namespaces project))
(find-namespaces-in-dir (file (:source-path project)))))
(find-namespaces-in-dir (file (:source-path project)))))]
(if (:main project)
(conj nses (:main project))
nses)))
(defn stale-namespaces
"Given a seq of namespaces that are both compilable and that hav missing or