CLJS-3237: compiling with --target node errors at runtime with docume…

…nt undefined

The problem was uncovered by the change in default-compile to pull in all relevant
compiler options from repl-options returned from the repl-env.

The issue was that --target node would still use the browser-repl repl-env which
sets :browser-repl true.

Add a target->repl-env helper that looks at the target and returns the true
repl-env in all cases.

This also means you can start a node REPL now with `clj -m cljs.main -t node -r`

Fixes the later half of the Quick Start

src/main/clojure/cljs/cli.clj

@@ -308,6 +308,13 @@ is trying load some arbitrary ns."
          (not (:repl-verbose options))
          (contains? #{"node"} (repl-name repl-env)))))
 
+(defn target->repl-env [target default]
+  (if (= :nodejs target)
+    (do
+      (require 'cljs.repl.node)
+      (resolve 'cljs.repl.node/repl-env))
+    default))
+
 (defn- repl-opt
   "Start a repl with args and inits. Print greeting if no eval options were
 present"
@@ -320,7 +327,7 @@ present"
         reopts (merge repl-env-options (select-keys opts [:output-dir]))
         _      (when (or ana/*verbose* (:verbose opts))
                  (util/debug-prn "REPL env options:" (pr-str reopts)))
-        renv   (apply repl-env (mapcat identity reopts))]
+        renv   (apply (target->repl-env (:target options) repl-env) (mapcat identity reopts))]
     (repl/repl* renv
       (assoc (dissoc-entry-point-opts opts)
         ::repl/fast-initial-prompt?
@@ -350,7 +357,7 @@ present"
                  (select-keys opts [:output-to :output-dir]))
         _      (when (or ana/*verbose* (:verbose opts))
                  (util/debug-prn "REPL env options:" (pr-str reopts)))
-        renv   (apply repl-env (mapcat identity reopts))
+        renv   (apply (target->repl-env (:target options) repl-env) (mapcat identity reopts))
         coptsf (when-let [od (:output-dir opts)]
                  (io/file od "cljsc_opts.edn"))
         copts  (when (and coptsf (.exists coptsf))
@@ -487,7 +494,7 @@ present"
   [repl-env {:keys [ns args options post-compile-fn] :as cfg}]
   (let [rfs      #{"-r" "--repl"}
         sfs      #{"-s" "--serve"}
-        env-opts (repl/repl-options (repl-env))
+        env-opts (repl/repl-options ((target->repl-env (:target options) repl-env)))
         repl?    (boolean (or (rfs ns) (rfs (first args))))
         serve?   (boolean (or (sfs ns) (sfs (first args))))
         main-ns  (get-main-ns cfg)