               (#'nrepl/take-until
                 #(and (= command-id (:id %))
                       (some #{"done" "interrupted" "error"} (:status %)))
-                response-seq)]
+                (session-responses session))]
         (do
           (when (some #{"need-input"} (:status res))
             (.readLine *in*) ; pop off leftover newline from pushback

  (let [connection         (get-connection options)
        client             (nrepl/client connection Long/MAX_VALUE)
        session            (nrepl/new-session client)
        completion-session (nrepl/new-session client) ]
    (reset! current-session session)
    (let [options (assoc options :prompt
                    (fn [ns]
                      (reader.jline/prepare-for-read

(ns reply.eval-modes.nrepl
  (:import [java.util.concurrent ConcurrentLinkedQueue])
  (:require [clojure.tools.nrepl.cmdline :as nrepl.cmdline]
            [clojure.tools.nrepl :as nrepl]
            [clojure.tools.nrepl.misc :as nrepl.misc]
