 
    :multi-get
    (fn [actx state-ch m]
-     (let [res-m (dissoc m :keys)
-           res-ch (:res-ch m)
+     (let [{:keys [kvs-ident kvs-snapshot res-ch]} m
+           res-m (dissoc m :keys)
            cb (fn [state kvs]
                 (act multi-get actx
                      (let [kc (:clean kvs)]


   :scan-changes
   (make-scan-fn :clean :changes :sq (fn [kc sq-key entry] entry))

   :sync
   (fn [actx state-ch m]

                                                              :entry entry})))))
                       (aput-close scan-work res-ch (merge m {:status :ok}))))
                nil)]
       (if kvs-snapshot
         (kvs-snapshot-do actx res-ch kvs-snapshot (kvs-checker kvs-ident cb))
         (kvs-do actx state-ch nil (kvs-checker kvs-ident cb))))))

(def op-handlers
  {:kvs-open
