     (assert sniffer&)
     @sniffer&))
 
+(defn get-last-ns [driver]
+  @(:last-ns driver))
+
+(defn set-last-ns [driver name]
+  (vreset! (:last-ns driver) name))
+
 ; -- announcements ----------------------------------------------------------------------------------------------------------
 
 (defn announce-job-start [driver job]

(defn custom-prompt-factory [driver]
  (fn []
    (let [stdout-sniffer (get-sniffer driver :stdout)]
      (announce-ns driver)
      (suppress-flushing driver :stdout)
      (cljs-repl/repl-prompt)

    (messaging/announce-job-end (:server driver) request-id)))

(defn announce-ns [driver]
  (messaging/announce-repl-ns (:server driver) (get-last-ns driver)))

; -- job management ---------------------------------------------------------------------------------------------------------

