Merge branch 'no-allocate-buffers'

1 files changed, 2 insertions, 2 deletions

diff --git a/tests/backend-tests.lisp b/tests/backend-tests.lisp
index 625740f..dc411d5 100644
--- a/tests/backend-tests.lisp
+++ b/tests/backend-tests.lisp
@@ -21,7 +21,7 @@
   `(let ((backend (make-instance 'hash-backend))
          (array ,array))
      (is (equalp (alexandria:read-stream-content-into-byte-vector
-                  (fetch-read-capability
+                  (fetch-data
                    (store-data array backend :block-size ,block-size :secret ,secret) backend))
                  array))))
 
@@ -49,7 +49,7 @@
           (let* ((backend (make-instance 'file-backend :directory tmpdir))
                  (array ,array))
             (is (equalp (alexandria:read-stream-content-into-byte-vector
-                         (fetch-read-capability
+                         (fetch-data
                           (store-data array backend :secret ,secret) backend))
                         array)))
        (uiop:delete-directory-tree tmpdir :validate t))))