yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Phil Hagelberg 2010-02-12 12:44:32 -08:00
parent 14f9691e0a
commit aaf60f6da0
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/leiningen/compile.clj
View file

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