From 0e1cd284c9c37e912d1a4ba73eb3c8ea4851e166 Mon Sep 17 00:00:00 2001
From: "Heiko Schlittermann (HS12-RIPE)" <hs@schlittermann.de>
Date: Wed, 23 Nov 2016 19:51:59 +0100
Subject: [PATCH] Testsuite: more diag info if initial Exim startup fails

---
 test/runtest | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/test/runtest b/test/runtest
index d9500cb5f..4483ec95b 100755
--- a/test/runtest
+++ b/test/runtest
@@ -2612,9 +2612,12 @@ close(IN);
 close(OUT);
 
 print("Probing with config file: $parm_cwd/test-config\n");
+
 my $eximinfo = "$parm_exim -d -C $parm_cwd/test-config -DDIR=$parm_cwd -bP exim_user exim_group";
 chomp(my @eximinfo = `$eximinfo 2>&1`);
-die "$0: got $? from $eximinfo\n" if $?;
+die "$0: Can't run $eximinfo\n" if $? == -1;
+
+warn 'Got ' . $?>>8 . " from $eximinfo\n" if $?;
 foreach (@eximinfo)
   {
   if (my ($version) = /^Exim version (\S+)/) {
-- 
2.25.1