Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-callback-procs.tcl,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-callback-procs.tcl 26 Jul 2005 16:46:01 -0000 1.1.2.2 @@ -0,0 +1,33 @@ +# packages/acs-mail-lite/tcl/acs-mail-lite-callback-procs.tcl + +ad_library { + + Callback procs for acs-mail-lite + + @author Malte Sussdorff (sussdorff@sussdorff.de) + @creation-date 2005-06-15 + @arch-tag: d9aec4df-102d-4b0d-8d0e-3dc470dbe783 + @cvs-id $Id: acs-mail-lite-callback-procs.tcl,v 1.1.2.2 2005/07/26 16:46:01 timoh Exp $ +} + +ad_proc -public -callback acs_mail_lite::complex_send { + {-package_id:required} + {-from_party_id:required} + {-to_party_id:required} + {-body} + {-message_id:required} + {-subject} + {-object_id} + {-file_ids} +} { +} + +ad_proc -public -callback acs_mail_lite::send { + {-package_id:required} + {-from_party_id:required} + {-to_party_id:required} + {-body} + {-message_id:required} + {-subject} +} { +}