Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v diff -u -N -r1.108.2.13 -r1.108.2.14 --- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 12 Nov 2020 14:56:36 -0000 1.108.2.13 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 15 Dec 2020 11:08:34 -0000 1.108.2.14 @@ -700,6 +700,12 @@ set delivery_mode [dict get $deliveryDict EmailDeliveryMode] } + foreach w $delivery_mode { + if {$w ni {smtp nssmtpd default log redirect ignore}} { + ns_log warning "unexpected entry '$w' in parameter EmailDeliveryMode (ignored)" + } + } + if {"nssmtpd" in $delivery_mode} { # # Filter the word "nssmtpd" from the EmailDeliveryMode and @@ -805,7 +811,7 @@ set fullMailMessage [mime::buildmessage $tokens] # - # Call "smtpd send" from the NaviServer nssmtpd module. + # Call "ns_smtpd send" from the NaviServer nssmtpd module. # When the last two arguments are not provided, the # command uses host and port from the configuration # section of the nssmtpd module.