Permalink
Browse files

Preserve order of :aot namespaces list.

  • Loading branch information...
1 parent 473250b commit df79e2e7a1d2a1561d96268766772454d70fa1f1 @technomancy committed Jul 3, 2010
Showing with 3 additions and 5 deletions.
  1. +3 −5 src/leiningen/compile.clj
@@ -20,11 +20,9 @@
their class files are present and up-to-date."
[project]
(let [nses (or (:aot project) (:namespaces project))
- nses (set (cond
- (coll? nses) nses
-
- (= :all nses)
- (find-namespaces-in-dir (file (:source-path project)))))]
+ nses (if (= :all nses)
+ (find-namespaces-in-dir (file (:source-path project)))
+ nses)]
(if (:main project)
(conj nses (:main project))
nses)))

0 comments on commit df79e2e

Please sign in to comment.