mirror of
git://git.gnupg.org/gnupg.git
synced 2025-01-30 16:17:02 +01:00
tests: Rework check for trust models.
* tests/openpgp/defs.scm (gpg-has-option?): New function. (have-opt-always-trust): Use a simpler test for that option. This way that is less distracting when we run the tests with verbose=3. Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
d6e332422f
commit
55dc81125a
@ -76,9 +76,14 @@
|
||||
(string-append prefix "/" (basename (caddr t))))))))
|
||||
|
||||
|
||||
(define have-opt-always-trust
|
||||
(define (gpg-has-option? option)
|
||||
(string-contains? (call-popen `(,(tool 'gpg) --dump-options) "")
|
||||
"--always-trust"))
|
||||
option))
|
||||
|
||||
(define have-opt-always-trust
|
||||
(catch #f
|
||||
(call-check `(,(tool 'gpg) --gpgconf-test --always-trust))
|
||||
#t))
|
||||
|
||||
(define GPG `(,(tool 'gpg) --no-permission-warning
|
||||
,@(if have-opt-always-trust '(--always-trust) '())))
|
||||
|
Loading…
x
Reference in New Issue
Block a user