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 -r1.1 -r1.2 --- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 4 May 2002 18:27:52 -0000 1.1 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl 8 May 2002 02:57:45 -0000 1.2 @@ -11,8 +11,8 @@ namespace eval acs_mail_lite { ad_proc -public send { - {-to:required} - {-from:required} + {-to_addr:required} + {-from_addr:required} {-subject ""} {-body:required} {-extraheaders ""} @@ -29,7 +29,6 @@ db_dml create_queue_entry {} } - ad_proc -private sweeper {} { Send messages in the acs_mail_lite_queue table. } {