From 6bc065ebd33e5d0abc4d3001eb24ab3e9c5a0e8d Mon Sep 17 00:00:00 2001 From: Alex Miller Date: Wed, 10 Mar 2021 08:29:20 -0600 Subject: [PATCH] debug --- src/main/clojure/clojure/tools/gitlibs.clj | 4 ++-- src/main/clojure/clojure/tools/gitlibs/impl.clj | 2 ++ 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/src/main/clojure/clojure/tools/gitlibs.clj b/src/main/clojure/clojure/tools/gitlibs.clj index 3a341bb..eb5be0e 100644 --- a/src/main/clojure/clojure/tools/gitlibs.clj +++ b/src/main/clojure/clojure/tools/gitlibs.clj @@ -54,7 +54,7 @@ :interactive (default false) - set true to allow stdin prompts (example: unknown host) :print-commands (default false) - set true to write git executions to stderr" ([url rev] - (resolve url rev nil)) + (resolve url rev {:print-commands true})) ([url rev opts] (first (resolve-all url [rev] opts)))) @@ -67,7 +67,7 @@ :interactive (default false) - set true to allow stdin prompts (example: unknown host) :print-commands (default false) - set true to write git commands to stderr" ([url lib rev] - (procure url lib rev nil)) + (procure url lib rev {:print-commands true})) ([url lib rev opts] (let [lib-dir (impl/lib-dir lib) git-dir-path (impl/ensure-git-dir url opts) diff --git a/src/main/clojure/clojure/tools/gitlibs/impl.clj b/src/main/clojure/clojure/tools/gitlibs/impl.clj index fe1367e..ecdf924 100644 --- a/src/main/clojure/clojure/tools/gitlibs/impl.clj +++ b/src/main/clojure/clojure/tools/gitlibs/impl.clj @@ -32,6 +32,8 @@ exit (.waitFor proc) out (slurp (.getInputStream proc)) err (slurp (.getErrorStream proc))] + (println out) + (println err) {:exit exit :out out :err err})) ;; config