[gnunet-scheme] 21/324: Fix typo

[gnunet]

This is an automated email from the git hooks/post-receive script.

maxime-devos pushed a commit to branch master
in repository gnunet-scheme.

commit d2aa3db3686f38fa29469c2dc12c37c0222a3e2b
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Mon Nov 9 20:29:04 2020 +0100

    Fix typo
---
 gnu/gnunet/directory.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/gnunet/directory.scm b/gnu/gnunet/directory.scm
index d2e36b4..a07233a 100644
--- a/gnu/gnunet/directory.scm
+++ b/gnu/gnunet/directory.scm
@@ -113,7 +113,7 @@ The MIMETYPE may not be already set.
 For reproducibility, it is important to be consistent in the
 use or inuse of data."
     (let ((fsize (chk-uri-file-length (chk-uri-parse uri)))
-         (meta-old-size (meta-deserialized-size meta-old)))
+         (meta-old-size (meta-serialized-size meta-old)))
       (receive (meta-to-use meta-size)
          ;; Try inlining data, except if it's too large.
           (if (and data
@@ -126,7 +126,7 @@ use or inuse of data."
                                        #f
                                        data))
                     (slen (+ (string-length uri) 1))
-                     (mdxs (meta-data-deserialized-size meta)))
+                     (mdxs (meta-serialized-size meta)))
                (if (= (floor/ (+ slen 4 mdxs -1) DBLOCK_SIZE)
                       (floor/ (+ slen 4 meta-old-size  -1) DBLOCK_SIZE))
                    ;; adding full data would not cause us to cross
@@ -187,7 +187,7 @@ after alignment to the DBLOCK_SIZE."
 passed as a vector, and some other things.
 The directory itself must have some sensible meta-data defined."
     (let* ((header-size (+ (bytevector-length directory-magic) 4))
-          (with-meta-size (+ header-size (meta-data-deserialized-size meta))))
+          (with-meta-size (+ header-size (meta-serialized-size meta))))
       (if (< 0 (vector-length dir-vector))
           (let ((sizes (vector-map entry-length dir-vector))
                (perm  (vector-unfold values (vector-length dir-vector))))

-- 
To stop receiving notification emails like this one, please contact
gnunet@gnunet.org.