   )
 
 (defmethod vconstruct :kvm [{:keys [digital-ocean machine] :as spec}]
+
   )
 


(timbre/refer-timbre)

(defrecord Domain []
  Vm
  (create [this]) 

  (delete [this])



(ns kvm.provider
  (:require 
    [clojure.core.strint :refer (<<)] 
    [kvm.clone :refer (clone-domain)]
    [kvm.common :refer (connect)]
    [celestial.provider :refer (wait-for wait-for-ssh map-key)] 
    [supernal.sshj :refer (ssh-up?)]
    [celestial.core :refer (Vm)] 
