[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[gnunet-scheme] 47/324: scripts: publish-store: don't index temporary fi
From: |
gnunet |
Subject: |
[gnunet-scheme] 47/324: scripts: publish-store: don't index temporary files |
Date: |
Tue, 21 Sep 2021 13:21:27 +0200 |
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 4341fef2e9df0bad3ead3797daaa418c5e1bd1dd
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Sat Jan 23 22:23:17 2021 +0100
scripts: publish-store: don't index temporary files
* gnu/gnunet/scripts/publish-store.scm (publish-object):
simplify argument list, and reorder arguments to 'gnunet-publish'.
---
gnu/gnunet/scripts/publish-store.scm | 7 ++-----
1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/gnu/gnunet/scripts/publish-store.scm
b/gnu/gnunet/scripts/publish-store.scm
index 68d4376..591974f 100644
--- a/gnu/gnunet/scripts/publish-store.scm
+++ b/gnu/gnunet/scripts/publish-store.scm
@@ -233,10 +233,7 @@ referred to by their hash."
(wrapped/string (scm->json-string wrapped)))
wrapped/string))
- (define* (publish-object data
- #:key
- #:allow-other-keys
- #:rest r)
+ (define* (publish-object data #:rest r)
"Publish DATA, a bytevector or filename, and return
the resulting GNUnet FS URI. If SIMULATE is #t, do not
actually publish the file, only compute its hash."
@@ -246,7 +243,7 @@ actually publish the file, only compute its hash."
(put-bytevector port data)
(close-port port)
(apply gnunet-publish name
- #:no-index #t r))))
+ (append r `(#:no-index #t))))))
((string? data)
(apply gnunet-publish data r))))
--
To stop receiving notification emails like this one, please contact
gnunet@gnunet.org.
- [gnunet-scheme] 35/324: scripts: publish-store: compute file tree, (continued)
- [gnunet-scheme] 35/324: scripts: publish-store: compute file tree, gnunet, 2021/09/21
- [gnunet-scheme] 43/324: scripts: publish-store: exit after main function, gnunet, 2021/09/21
- [gnunet-scheme] 48/324: scripts: download-store: download json container, gnunet, 2021/09/21
- [gnunet-scheme] 45/324: scripts: publish-store: fix '--config' option parsing, gnunet, 2021/09/21
- [gnunet-scheme] 46/324: scripts: download-store: parse input arguments, gnunet, 2021/09/21
- [gnunet-scheme] 42/324: scripts: publish-store: export some procedures, gnunet, 2021/09/21
- [gnunet-scheme] 44/324: doc: document publish-store.scm, gnunet, 2021/09/21
- [gnunet-scheme] 53/324: doc: add a section on Guix in the roadmap, gnunet, 2021/09/21
- [gnunet-scheme] 51/324: scripts: publish-store: add option for printing generated JSON, gnunet, 2021/09/21
- [gnunet-scheme] 52/324: scripts: download-store: add downloading procedure, gnunet, 2021/09/21
- [gnunet-scheme] 47/324: scripts: publish-store: don't index temporary files,
gnunet <=
- [gnunet-scheme] 50/324: scripts: download-store: (partially) validate entries, gnunet, 2021/09/21
- [gnunet-scheme] 49/324: scripts: publish-store: correct file name creation, gnunet, 2021/09/21
- [gnunet-scheme] 57/324: mq: define priority and preference values, gnunet, 2021/09/21
- [gnunet-scheme] 59/324: Fix value creation in integer->value, gnunet, 2021/09/21
- [gnunet-scheme] 54/324: Add missing dependency ‘guix-stuff.scm’, gnunet, 2021/09/21
- [gnunet-scheme] 62/324: Change e-mail address, gnunet, 2021/09/21
- [gnunet-scheme] 58/324: scripts: publish-store: use SRFI-39 parameters for configuration, gnunet, 2021/09/21
- [gnunet-scheme] 61/324: Write code for message handlers, gnunet, 2021/09/21
- [gnunet-scheme] 55/324: enum: implement docstrings and general niceness, gnunet, 2021/09/21
- [gnunet-scheme] 56/324: Define many GNUnet message types., gnunet, 2021/09/21