(defmethod db-del ((db db-txn) key &key txn) (with-txn (txn (db-get-env db) :txn txn) (%db-del db txn (cbuffer-data key) (cbuffer-size key) 0)))