   (wait-predicate #(has-class? driver q class) opt))
 
 (defn wait-running [driver & [opt]]
+  (log/debugf "Waiting for %s:%s is running"
+              (:host @driver) (:port @driver))
   (wait-predicate #(running? driver) opt))
 
 ;;

           :port port
           :url url
           :locator locator)
    driver))

(defn run-driver

           :env env
           :args full-args
           :process process)
    (log/debugf "Started process: %s" (str/join \space full-args))
    driver))

(defn connect-driver
