X-Git-Url: https://git.exim.org/users/jgh/exim.git/blobdiff_plain/02b41d7106c67bbe862d6a44373034684a03c00e..f6ef9370d8ad193be6b0203aa85d52b40779242d:/test/runtest diff --git a/test/runtest b/test/runtest index a6560aaa7..ac840379c 100755 --- a/test/runtest +++ b/test/runtest @@ -1515,7 +1515,7 @@ $munges = )($|[ ]=)/x' }, 'sys_bindir' => - { 'mainlog' => 's%/(usr/)?bin/%SYSBINDIR/%' }, + { 'mainlog' => 's%/(usr/(local/)?)?bin/%SYSBINDIR/%' }, 'sync_check_data' => { 'mainlog' => 's/^(.* SMTP protocol synchronization error .* next input=.{8}).*$/$1/', @@ -2274,6 +2274,14 @@ elsif (/^((?i:[A-Z\d_]+=\S+\s+)+)?(\d+)?\s*(sudo(?:\s+-u\s+(\w+))?\s+)?exim(_\S+ my(@msglist) = (); while () { push (@msglist, $1) if /^\s*\d+[smhdw]\s+\S+\s+(\S+)/; } close(QLIST); + # We need the message ids sorted in ascending order. + # Message id is: --. On some systems (*BSD) the + # PIDs are randomized, so sorting just the whole PID doesn't work. + # We do the Schartz' transformation here (sort on + # ). Thanks to Kirill Miazine + @msglist = map { $_->[0] } + sort { $a->[1] cmp $b->[1] } + map { [$_, join '', (split '-', $_)[0,2]] } @msglist; # Done backwards just in case there are more than 9