   (when-let [features (:features spec)] 
     ;vzctl set 170 --features "nfs:on" --save 
     (doseq [f features] 
+      (trace "enabling feature" f)
       (vzctl this (<< "set ~{vmid} --features \"~{f}\" --save")))) )
+
 
 (defn key-set [h] (->> h keys (into #{})))
 


(defn vzctl 
  [this action] 
  {:pre [(= (.status this) "running")]}
  (execute (config :hypervisor) [(<< "vzctl ~{action}")]))


  (:use 
    [trammel.core :only  (defconstrainedrecord)]
    [clojure.core.memoize :only (memo-ttl)]
    [taoensso.timbre :only (debug info error warn trace)]
    [clojure.core.strint :only (<<)]
    [celestial.core :only (Vm )]
    [celestial.ssh :only (execute)]
