                              :send-result
                              (evaluate-javascript js))))
     (net/connect repl-connection
-                 #(log-obj "Parent REPL channel connection.")
+                 (constantly nil)
                  (fn [iframe]
                    (set! iframe.style.display
                          "none")))))

                                     connection
                                     url))
      (net/connect repl-connection
                   #(log-obj "Child REPL channel connected."))

      (js/setTimeout #(send-result connection url "ready") 50))
    (js/alert "No 'xpc' param provided to child iframe.")))

  (:require [clojure.browser.net   :as net]
            [clojure.browser.event :as event]))

(defn evaluate-javascript
  "Process a single block of JavaScript received from the server"
  [block]
  (let [result (try {:status :success :value (str (js* "eval(~{block})"))}
                    (catch js/Error e {:status :exception :value (pr-str e)}))]
    (pr-str result)))

(defn send-result [connection url data]
