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

Move user-level deploy repos to (user-settings)

Browse source
This commit is contained in:
Michał Marczyk 2011-10-25 08:07:08 +02:00
parent 5f15fc0783
commit 7aae51b09e
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/leiningen/core.clj
View file

@ -160,8 +160,7 @@ order guarantee."
(let [project-repos (for [[id settings] (kind project)] (let [project-repos (for [[id settings] (kind project)]
[id (init-settings id settings)]) [id (init-settings id settings)])
user-deploy-repos (when (= kind :deploy-repositories) user-deploy-repos (when (= kind :deploy-repositories)
(when-let [v (resolve 'user/deploy-repositories)] (into [] (:deploy-repositories (user-settings))))
(into [] @v)))
all-repos (concat all-repos (concat
(into [] (into []
(if (:omit-default-repositories project) (if (:omit-default-repositories project)