From 7a10041529b179cd45a71ebe579af5e2eeddb51d Mon Sep 17 00:00:00 2001 From: Philip Hazel Date: Thu, 22 Dec 2005 11:47:24 +0000 Subject: [PATCH] Fix incomplete -C test facility in exinext. --- doc/doc-txt/ChangeLog | 6 +++++- src/src/exinext.src | 8 +++++--- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/doc/doc-txt/ChangeLog b/doc/doc-txt/ChangeLog index 7122575df..c91c77b63 100644 --- a/doc/doc-txt/ChangeLog +++ b/doc/doc-txt/ChangeLog @@ -1,4 +1,4 @@ -$Cambridge: exim/doc/doc-txt/ChangeLog,v 1.280 2005/12/19 12:25:21 ph10 Exp $ +$Cambridge: exim/doc/doc-txt/ChangeLog,v 1.281 2005/12/22 11:47:24 ph10 Exp $ Change log file for Exim from version 4.21 ------------------------------------------- @@ -60,6 +60,10 @@ PH/10 Fixed another bug related to PH/04 above: if an incoming message had a it logs this as a hard delivery error, but does not attempt to create a bounce message. +PH/11 The exinext utility has a -C option for testing purposes, but although + the given file was scanned by exinext itself; it wasn't being passed on + when Exim was called. + Exim version 4.60 ----------------- diff --git a/src/src/exinext.src b/src/src/exinext.src index c942120b0..47f9de517 100644 --- a/src/src/exinext.src +++ b/src/src/exinext.src @@ -1,5 +1,5 @@ #! /bin/sh -# $Cambridge: exim/src/src/exinext.src,v 1.1 2004/10/07 10:39:01 ph10 Exp $ +# $Cambridge: exim/src/src/exinext.src,v 1.2 2005/12/22 11:47:24 ph10 Exp $ # Copyright (c) 1996-2004 University of Cambridge. # See the file NOTICE for conditions of use and distribution. @@ -107,13 +107,14 @@ qualify_domain=`$exim_path $eximmacdef -C $config -bP qualify_domain | sed 's/.* # pick up routing delays after temporary recipient errors. # Also add unqualified subject if it looks like a message id. # 01-Apr-2004 Add the -C feature for testing +# 22-Dec-2005 Complete the -C feature (!) if [ "$argone" = "" ]; then echo "Usage: exinext
||" exit 1 fi -perl - $exim_path "$eximmacdef" $argone $spool_directory $qualify_domain <<'End' +perl - $exim_path "$eximmacdef" $argone $spool_directory $qualify_domain $config <<'End' # Name the arguments @@ -122,6 +123,7 @@ perl - $exim_path "$eximmacdef" $argone $spool_directory $qualify_domain <<'End' $subject = $ARGV[2]; $spool = $ARGV[3]; $qualify = $ARGV[4]; + $config = $ARGV[5]; # If the subject doesn't contain an @ then construct an address # for the domain, and ensure that in both cases the domain is @@ -133,7 +135,7 @@ perl - $exim_path "$eximmacdef" $argone $spool_directory $qualify_domain <<'End' # Run Exim to get a list of hosts for the given domain; for # each one construct the appropriate retry key. - open(LIST, "$exim -v -bt $address |") || + open(LIST, "$exim -C $config -v -bt $address |") || die "can't run exim to route $address"; while () -- 2.25.1