Skip to content

Commit 8c7bc5e

Browse files
committed
CLJS-2908: Don't show quick prompt if :verbose or :repl-verbose
1 parent b18d0f6 commit 8c7bc5e

File tree

1 file changed

+4
-2
lines changed

1 file changed

+4
-2
lines changed

src/main/clojure/cljs/cli.clj

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -301,9 +301,11 @@ is trying load some arbitrary ns."
301301
(when (string/starts-with? repl-ns "cljs.repl.")
302302
(subs repl-ns (count "cljs.repl.")))))
303303

304-
(defn- fast-initial-prompt? [repl-env inits]
304+
(defn- fast-initial-prompt? [repl-env options inits]
305305
(boolean
306306
(and (empty? inits)
307+
(not (:verbose options))
308+
(not (:repl-verbose options))
307309
(contains? #{"node"} (repl-name repl-env)))))
308310

309311
(defn- repl-opt
@@ -322,7 +324,7 @@ present"
322324
(repl/repl* renv
323325
(assoc (dissoc-entry-point-opts opts)
324326
::repl/fast-initial-prompt?
325-
(or (fast-initial-prompt? repl-env inits)
327+
(or (fast-initial-prompt? repl-env options inits)
326328
(::repl/fast-initial-prompt? (repl/repl-options renv)))
327329

328330
:quit-prompt

0 commit comments

Comments
 (0)