               (repl/mapped-stacktrace stacktrace build-options)]
         (let [url (when url (string/trim (.toString url)))
               file (when file (string/trim (.toString file)))]
-          ((println-fn repl/*repl-opts*)
-            "\t" (str (when function (str function " "))
-                      "(" (source url file) (when line (str ":" line)) (when column (str ":" column)) ")"))))))
+          (repl-println repl/*repl-opts*
+            (str "\t" (when function (str function " "))
+              "(" (source url file) (when line (str ":" line)) (when column (str ":" column)) ")"))))))
   repl/IJavaScriptEnv
   (-setup [repl-env opts]
     (setup repl-env opts))

          output-dir (io/file webdav-mount-point)
          env (ana/empty-env)
          core (io/resource "cljs/core.cljs")]
      ((println-fn opts) "\nConnecting to" (bonjour-name->display-name bonjour-name) "...\n")
      (set-up-socket repl-env opts endpoint-address (dec endpoint-port))
      (if (= "true" (:value (jsc-eval repl-env "typeof cljs === 'undefined'")))
        (do

                   (deliver resp-promise :eof))
                 :eof)
      (= c 1) (do
                (repl-print opts (str sb))
                (repl-flush opts)
                (recur (StringBuilder.) (.read in)))
      (= c 0) (do
                (deliver @response-promise (str sb))
