Changeset View
Changeset View
Standalone View
Standalone View
tests/gpgsm/gpgsm-defs.scm
Context not available. | |||||
(call-check `(,(tool 'gpgtar) --extract --directory=. ,(cadr *args*))) | (call-check `(,(tool 'gpgtar) --extract --directory=. ,(cadr *args*))) | ||||
(create-gpgsm-gpghome)) | (create-gpgsm-gpghome)) | ||||
(start-agent)) | (start-agent)) | ||||
(define (setup-gpgsm-environment-no-atexit) | |||||
(if (member "--unpack-tarball" *args*) | |||||
(call-check `(,(tool 'gpgtar) --extract --directory=. ,(cadr *args*))) | |||||
(create-gpgsm-gpghome)) | |||||
(start-agent #t)) | |||||
Context not available. |