Changeset View

Standalone View

Context not available.
	(lambda (cert)	(lambda (cert)
	(lettmp (exported)	(lettmp (exported)
	(call-check `(,@gpgsm --output ,exported --export ,cert::uid::CN))	(call-check `(,@gpgsm --output ,exported --export ,cert::uid::CN))
	(with-ephemeral-home-directory setup-gpgsm-environment	(with-ephemeral-home-directory setup-gpgsm-environment-no-atexit
	(call-check `(,@gpgsm --import ,exported))	(call-check `(,@gpgsm --import ,exported))
	(assert (sm-have-public-key? cert)))))	(assert (sm-have-public-key? cert)))))
	(lambda (cert) cert::uid::CN)	(lambda (cert) cert::uid::CN)
Context not available.