Debug output in apply-task.

technomancy · Oct 4, 2012 · ff0e95b · ff0e95b
1 parent b5dc41a
commit ff0e95b
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/bin/lein b/bin/lein
@@ -139,6 +139,8 @@ if [ -r "$BIN_DIR/../src/leiningen/version.clj" ]; then
 else # Not running from a checkout
     add_path CLASSPATH "$LEIN_JAR"
 
+    # TODO: unify setting this; it's a complete mess. Should be able
+    # to easily modify jvm opts without losing bootclasspath
     export LEIN_JVM_OPTS=${LEIN_JVM_OPTS:-"-Xbootclasspath/a:$LEIN_JAR"}
 
     if [ ! -r "$LEIN_JAR" -a "$1" != "self-install" ]; then

diff --git a/leiningen-core/src/leiningen/core/main.clj b/leiningen-core/src/leiningen/core/main.clj
@@ -143,6 +143,7 @@
     (when-not (matching-arity? task args)
       (abort "Wrong number of arguments to" task-name "task."
              "\nExpected" (rest (:arglists (meta task)))))
+    (debug "Applying task" task-name "to" args)
     (let [value (apply task project args)]
       ;; TODO: remove this for final release
       (when (and value (number? value))