diff options
| author | Justus Winter <[email protected]> | 2017-04-06 10:33:37 +0000 |
|---|---|---|
| committer | Justus Winter <[email protected]> | 2017-04-06 10:36:00 +0000 |
| commit | 94645311f8a3e9ae33643512f87fbef41bf0556f (patch) | |
| tree | a809f9d4e39a868d06d3476b5d008579239367c5 /tests/openpgp/defs.scm | |
| parent | tests: Fix setup of ephemeral home directories. (diff) | |
| download | gnupg-94645311f8a3e9ae33643512f87fbef41bf0556f.tar.gz gnupg-94645311f8a3e9ae33643512f87fbef41bf0556f.zip | |
tests: Make test more robust.
* tests/openpgp/4gb-packet.scm: Skip if we do not have BZIP2.
* tests/openpgp/defs.scm (have-compression-algo?): New function.
GnuPG-bug-id: 3028
Signed-off-by: Justus Winter <[email protected]>
Diffstat (limited to '')
| -rw-r--r-- | tests/openpgp/defs.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tests/openpgp/defs.scm b/tests/openpgp/defs.scm index 815a560c7..29eb7753d 100644 --- a/tests/openpgp/defs.scm +++ b/tests/openpgp/defs.scm @@ -258,6 +258,8 @@ (not (not (member x (force all-hash-algos))))) (define (have-cipher-algo? x) (not (not (member x (force all-cipher-algos))))) +(define (have-compression-algo? x) + (not (not (member x (force all-compression-algos))))) (define (gpg-pipe args0 args1 errfd) (lambda (source sink) |