Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-13 07:57:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Don't verify signature if not present even if checks forced.

Browse source
This commit is contained in:
Alex Shinn 2015-05-09 08:28:21 +09:00
parent 70143023ba
commit c8efdd0b58
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/chibi/snow/commands.scm
View file

@ -1925,7 +1925,10 @@
(define (package-maybe-signature-mismatches repo impl cfg pkg raw) (define (package-maybe-signature-mismatches repo impl cfg pkg raw)
(cond (cond
((conf-get cfg 'ignore-signature? #t) #f) ((conf-get cfg 'ignore-signature? #t) #f)
((not (assq 'signature (cdr pkg))) ((not (cond
((assq 'signature (cdr pkg))
=> (lambda (x) (assoc-get (cdr x) 'rsa)))
(else #f)))
(and (conf-get cfg 'require-signature?) (and (conf-get cfg 'require-signature?)
(not (yes-or-no? cfg "Package signature missing.\nProceed anyway?")) (not (yes-or-no? cfg "Package signature missing.\nProceed anyway?"))
'(package-signature-missing))) '(package-signature-missing)))