   ([command opts]
    (let [wrapped-exec (async-exec command opts)
          realized-exec (-> wrapped-exec deref :exec deref)]
-     (logging/warn 'wrapped-exec wrapped-exec)
-     (logging/warn 'realized-exec realized-exec)
      (when-let [ex (-> wrapped-exec deref :exception)] (throw ex))
      (when-not (= 0 (:exit realized-exec))
        (throw  (ex-info (str "Execution `"

                             (* 1000.0))
      (integer? timeout) (* timeout 1.0)
      :else (* 10 1000.0))))

(defn exec
  ([command]

                        @wrapped-exec)))
     realized-exec)))


;### Debug #####################################################################
;(debug/debug-ns *ns*)
