CLJS-2345: escape paths emitted as args to cljs.core.load_file

Author: cemerick

src/main/clojure/cljs/compiler.cljc

@@ -1114,10 +1114,14 @@
                (if (= :nodejs target)
                  ;; under node.js we load foreign libs globally
                  (let [ijs (get js-dependency-index (name lib))]
-                   (emitln "cljs.core.load_file(\""
-                     (str (io/file (util/output-directory options) (or (deps/-relative-path ijs)
-                                                                     (util/relative-name (:url ijs)))))
-                     "\");"))
+                   (emitln "cljs.core.load_file("
+                     (-> (io/file (util/output-directory options)
+                                  (or (deps/-relative-path ijs)
+                                      (util/relative-name (:url ijs))))
+                         str
+                         escape-string
+                         wrap-in-double-quotes)
+                     ");"))
                  (emitln "goog.require('" (munge lib) "');")))]
             :cljs
             [(and (ana/foreign-dep? lib)