From f19eeeb746d62d360abc3541e617a00bb75a6479 Mon Sep 17 00:00:00 2001 From: Marko Topolnik Date: Wed, 10 Apr 2013 13:48:02 +0200 Subject: [PATCH] Populate project-map meta when outside project // cherry-picked from master --- leiningen-core/src/leiningen/core/main.clj | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/leiningen-core/src/leiningen/core/main.clj b/leiningen-core/src/leiningen/core/main.clj index 4cdaaa5a..c70c4297 100644 --- a/leiningen-core/src/leiningen/core/main.clj +++ b/leiningen-core/src/leiningen/core/main.clj @@ -239,8 +239,9 @@ Get the latest version of Leiningen at http://leiningen.org or by executing (let [project (project/init-project (if (.exists (io/file "project.clj")) (project/read) - (assoc (project/make (:user (user/profiles))) - :eval-in :leiningen :prep-tasks []))) + (-> (project/make {:eval-in :leiningen :prep-tasks []}) + project/project-with-profiles + (project/init-profiles [:default])))) [task-name args] (task-args raw-args project)] (when (:min-lein-version project) (verify-min-version project)) (configure-http)