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

This commit is contained in:
Michał Marczyk 2011-10-25 08:07:08 +02:00
parent 5f15fc0783
commit 7aae51b09e

View file

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