[gnunet-scheme] 78/324: scripts: download-store: remove debugging

[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 99b37ac74e2a43f31474cf1d8e0041408c3dc8fa
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Sat Feb 6 21:48:26 2021 +0100

    scripts: download-store: remove debugging
    
    * gnu/gnunet/scripts/download-store.scm
      (file-type+size, port-for-hash): remove debugging code.
---
 gnu/gnunet/scripts/download-store.scm | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/gnu/gnunet/scripts/download-store.scm 
b/gnu/gnunet/scripts/download-store.scm
index ad57e2e..322062a 100644
--- a/gnu/gnunet/scripts/download-store.scm
+++ b/gnu/gnunet/scripts/download-store.scm
@@ -255,7 +255,6 @@ car the directory entry name, and as cdr the file."
       "Download the normalised archive in @var{gnunet-nix-archive-json/0}
 format from @var{uri} to the file @var{output}."
       (define (file-type+size file+root?)
-       (display (car file+root?))
        (if (cdr file+root?)
            (match (car file+root?)
              (`(regular (@ (executable? ,executable?)
@@ -285,10 +284,7 @@ format from @var{uri} to the file @var{output}."
                                 (delete-file name)))
          ;; XXX copying everything to the filesystem first
          ;; isn't ideal.
-         (display 'tick)
          (gnunet-download hash (port-filename port))
-         (display 'tack)
-         (display port)
          port))
       (define (file-port file+root?)
        (port-for-hash

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