diff options
| author | Jeremy Harris <jgh146exb@wizmail.org> | 2023-02-26 13:12:50 +0000 |
|---|---|---|
| committer | Jeremy Harris <jgh146exb@wizmail.org> | 2023-02-26 13:12:50 +0000 |
| commit | 03755744c9c07af50c92f44d287f1c4ea0db71be (patch) | |
| tree | a4c58157a49b3e0d885d7aa958dbb658db26718f /test/runtest | |
| parent | a7079166663db0d37e659f36e75589738873c18d (diff) | |
| download | exim4-03755744c9c07af50c92f44d287f1c4ea0db71be.tar.gz | |
Testsuite: env var for command
Diffstat (limited to 'test/runtest')
| -rwxr-xr-x | test/runtest | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/runtest b/test/runtest index 3931b06d4..137f8dac6 100755 --- a/test/runtest +++ b/test/runtest @@ -2304,10 +2304,11 @@ my($yield) = 1; our %ENV = map { $_ => $ENV{$_} } grep { /^(?:USER|SHELL|PATH|TERM|EXIM_TEST_.*)$/ } keys %ENV; -if (/^(\d+)\s*$/) # Handle unusual return code +if (/^(\d+)\s*(?:([A-Z]+)=(\S+))?$/) # Handle unusual return code { my($r) = $_[2]; $$r = $1 << 8; + $ENV{$2} = $3 if (defined $2); $_ = <SCRIPT>; return 4 if !defined $_; # Missing command $lineno++; |