From 855e79b7ffa37ac64de51defa18104ed897576b3 Mon Sep 17 00:00:00 2001
From: Piotr Szarmanski
Date: Fri, 30 Dec 2022 09:00:15 +0100
Subject: Initial buffer reuse encoding commit

---
 src/hash-backend.lisp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'src/hash-backend.lisp')

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)))
-- 
cgit v1.2.3