Initial buffer reuse encoding commit

1 files changed, 3 insertions, 2 deletions

diff --git a/src/hash-backend.lisp b/src/hash-backend.lisp
index 91dc673..c44c2d0 100644
--- a/src/hash-backend.lisp
+++ b/src/hash-backend.lisp
@@ -32,9 +32,10 @@
             output-function (lambda (block reference)
                               (declare (type octet-vector block reference))
                               (setf (gethash reference hash-table)
-                                    block))))))
+                                    block)
+                              block)))))
 
-(defmethod fetch-read-capability (read-capability (backend hash-backend) &key &allow-other-keys)
+(defmethod fetch-data (read-capability (backend hash-backend) &key &allow-other-keys)
   (declare (type read-capability read-capability))
   (with-slots (fetch-function) backend
     (eris-decode read-capability fetch-function :cache-capacity nil)))