mirror of
git://git.gnupg.org/gnupg.git
synced 2025-07-03 22:56:33 +02:00
tests/migrations: Fix distcheck.
* tests/migrations/Makefile.am (TESTS): Rename test. (TEST_FILES): Update list. (EXTRA_DIST): Add common.scm. * tests/migrations/common.scm (GPGTAR): New variable. (dearmor): Rename and untar archive. * tests/migrations/extended-private-key-format.scm: Rename. (setup): Update. * tests/migrations/extended-pkf.tar.asc: New file. * tests/migrations/extended-private-key-format.gpghome: Delete. * tests/migrations/from-classic.gpghome: Likewise. * tests/migrations/from-classic.scm (setup): Update. * tests/migrations/from-classic.tar.asc: New file. Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
0b8a335879
commit
b70d08827d
14 changed files with 440 additions and 322 deletions
|
@ -30,11 +30,10 @@
|
|||
--no-secmem-warning --batch
|
||||
,(string-append "--agent-program=" GPG-AGENT
|
||||
"|--debug-quick-random")))
|
||||
(define GPGTAR (qualify (string-append (getcwd) "/../../tools/gpgtar")))
|
||||
|
||||
(define (dearmor source-name sink-name)
|
||||
(define (untar-armored source-name)
|
||||
(pipe:do
|
||||
(pipe:open source-name (logior O_RDONLY O_BINARY))
|
||||
(pipe:spawn `(,@GPG --dearmor))
|
||||
(pipe:write-to sink-name
|
||||
(logior O_WRONLY O_CREAT O_BINARY)
|
||||
#o600)))
|
||||
(pipe:spawn `(,GPGTAR --extract --directory=. -))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue