diff options
| author | NIIBE Yutaka <gniibe@fsij.org> | 2022-12-01 09:11:32 +0100 |
|---|---|---|
| committer | NIIBE Yutaka <gniibe@fsij.org> | 2022-12-01 09:11:32 +0100 |
| commit | 1b434111a18680a97e9997af71c261058cabc5fa (patch) | |
| tree | 75c6ed93408422c665b2f25fd039e63b25233187 | |
| parent | tests: More fix for semihosted environment. (diff) | |
| download | gnupg2-1b434111a18680a97e9997af71c261058cabc5fa.tar.xz gnupg2-1b434111a18680a97e9997af71c261058cabc5fa.zip | |
tests: Put a workaround for semihosted environment.
* tests/openpgp/defs.scm [*win32*]: Use --build-prefix option.
--
On the semihosted environment, output of simple gpgconf
--list-components includes drive name (like Z:), which results failure
of command invocation. This is a workaround.
Signed-off-by: NIIBE Yutaka <gniibe@fsij.org>
| -rw-r--r-- | tests/openpgp/defs.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/openpgp/defs.scm b/tests/openpgp/defs.scm index 5122a8e30..bf3714f50 100644 --- a/tests/openpgp/defs.scm +++ b/tests/openpgp/defs.scm @@ -146,6 +146,9 @@ (gpg-conf' "" args)) (define (gpg-conf' input args) (let ((s (call-popen `(,(tool-hardcoded 'gpgconf) + ,@(if *win32* + (list '--build-prefix (getenv "objdir")) + '()) ,@args) input))) (map (lambda (line) (map percent-decode (string-split line #\:))) (string-split-newlines s)))) |