aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNikita Karetnikov <nikita@karetnikov.org>2014-03-15 11:46:16 +0000
committerLudovic Courtès <ludo@gnu.org>2014-03-30 12:02:10 +0200
commit24194b6b543427510766813fdce01cfb79d00651 (patch)
tree486b4d85421570d1577d97d2a6fcd9b93e3b5ca9
parent3f5497ee10e2ae55ce25d527b7352fb6647b14c2 (diff)
downloadpatches-24194b6b543427510766813fdce01cfb79d00651.tar
patches-24194b6b543427510766813fdce01cfb79d00651.tar.gz
nar: Clarify that 'assert-valid-signature' accepts a string.
* guix/nar.scm (assert-valid-signature): Improve the wording.
-rw-r--r--guix/nar.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/nar.scm b/guix/nar.scm
index 5bf174554c..dfee309d04 100644
--- a/guix/nar.scm
+++ b/guix/nar.scm
@@ -369,8 +369,9 @@ while the locks are held."
port)
(define (assert-valid-signature signature hash file)
- ;; Bail out if SIGNATURE, an sexp, doesn't match HASH, a bytevector
- ;; containing the expected hash for FILE.
+ ;; Bail out if SIGNATURE, which must be a string as produced by
+ ;; 'canonical-sexp->string', doesn't match HASH, a bytevector containing
+ ;; the expected hash for FILE.
(let* ((signature (catch 'gcry-error
(lambda ()
(string->canonical-sexp signature))