Skip to content

A
acs-mail
Commit f86c5730 authored by Frank Bergmann's avatar Frank Bergmann
Browse files
Options

-- adjusted ns_send parameter for cmpatibility reasons

parent 8c9f7912
Hide whitespace changes
Inline Side-by-side
Showing with 4 additions and 1 deletion
tcl/acs-mail-procs.tcl
View file @ f86c5730
...@@ -402,8 +402,11 @@ ad_proc -private acs_mail_process_queue { ...@@ -402,8 +402,11 @@ ad_proc -private acs_mail_process_queue {
acs_mail_queue_outgoing acs_mail_queue_outgoing
LIMIT 700 LIMIT 700
} { } {
set to_send [acs_mail_body_to_output_format -link_id $message_id] set to_send [acs_mail_body_to_output_format -link_id $message_id]
set to_send_2 [list $envelope_to $envelope_from [lindex $to_send 2] [lindex $to_send 3] [lindex $to_send 4]] # set to_send_2 [list $envelope_to $envelope_from [lindex $to_send 2] [lindex $to_send 3] [lindex $to_send 4]]
set to_send_2 [list $envelope_to $envelope_from [lindex $to_send 2] [lindex $to_send 3] ]
ns_log notice "acs_mail_process_queue: to_send_2=$to_send_2" ns_log notice "acs_mail_process_queue: to_send_2=$to_send_2"
if [catch { if [catch {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment