X-Git-Url: https://git.exim.org/users/heiko/exim.git/blobdiff_plain/08e7d709ca644d48b54cc731d1428c14f62710be..cafbabb774a4721e4ae7de7746ec0fc27d90d8b1:/test/runtest?ds=inline diff --git a/test/runtest b/test/runtest index 926385f17..c3faa4262 100755 --- a/test/runtest +++ b/test/runtest @@ -560,7 +560,7 @@ RESET_AFTER_EXTRA_LINE_READ: s/\buid=$parm_caller_uid\b/uid=CALLER_UID/g; s/\bgid=$parm_caller_gid\b/gid=CALLER_GID/g; - s/\bname=$parm_caller_gecos\b/name=CALLER_GECOS/g; + s/\bname="?$parm_caller_gecos"?/name=CALLER_GECOS/g; # When looking at spool files with -Mvh, we will find not only the caller # login, but also the uid and gid. It seems that $) in some Perls gives all @@ -833,6 +833,11 @@ RESET_AFTER_EXTRA_LINE_READ: next; } } + + # openssl version variances + next if /^SSL info: unknown state/; + next if /^SSL info: SSLv2\/v3 write client hello A/; + } # ======== stderr ======== @@ -3353,9 +3358,20 @@ foreach $test (@test_list) undef %expected_msglogs; # Open the test's script - open(SCRIPT, "scripts/$test") || tests_exit(-1, "Failed to open \"scripts/$test\": $!"); + # Run through the script once to set variables which should be global + while (