         (is (= {:uber-key (t/uber-key m)
                 :uber-key-value [ida]
                 :key [:nick]
-                :key-value ["foo"]}))
+                :key-value ["foo"]}
+               key-desc))
         (is (= :stale reason))))
 
     (testing "attempting to release someone else's key"

        (is (= {:id id :nick "blah" :a "newa" :b "oldb"}
               (select-keys fr [:id :nick :a :b])))
        (is (some? (:a_ttl fr)))
        (is (= (> (:a_ttl fr) 5)))
        (is (some? (:a_writetime fr)))
        (is (= (> (:a_writetime fr) 5)))))

    (testing "with if-not-exists"


        (is (= {:id id :nick nil :a "ana" :b "anb"}
               (select-keys fr [:id :nick :a :b])))
        (is (some? (:a_ttl fr)))
        (is (> (:a_ttl fr) 5))
        (is (some? (:a_writetime fr)))
        (is (> (:a_writetime fr) 5))))

    (testing "update existing record"
      (let [id (uuid/v1)
