Add default method to fetch-data and store-data, remove redundant methods.

1 files changed, 0 insertions, 14 deletions

diff --git a/src/hash-backend.lisp b/src/hash-backend.lisp
index 0fa095a..7568db3 100644
--- a/src/hash-backend.lisp
+++ b/src/hash-backend.lisp
@@ -35,18 +35,4 @@
                                     (copy-seq block))
                               block)))))
 
-(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)))
-
-(defmethod store-data (input (backend hash-backend) &key (secret null-secret) (block-size 1kib) &allow-other-keys)
-  (declare (type octet-vector secret))
-  (with-slots (output-function) backend
-    (eris-encode input
-                 block-size
-                 output-function
-                 :hash-output nil
-                 :secret secret)))
-