diff options
| author | Nikita Karetnikov <nikita@karetnikov.org> | 2014-03-15 11:46:16 +0000 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-03-30 12:02:10 +0200 |
| commit | 24194b6b543427510766813fdce01cfb79d00651 (patch) | |
| tree | 486b4d85421570d1577d97d2a6fcd9b93e3b5ca9 /guix | |
| parent | 3f5497ee10e2ae55ce25d527b7352fb6647b14c2 (diff) | |
nar: Clarify that 'assert-valid-signature' accepts a string.
* guix/nar.scm (assert-valid-signature): Improve the wording.
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/nar.scm | 5 |
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)) |