Index: openacs-4/packages/invoices/www/invoices-send.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoices-send.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/invoices/www/invoices-send.tcl	31 Dec 2005 07:38:26 -0000	1.2
+++ openacs-4/packages/invoices/www/invoices-send.tcl	10 Apr 2006 11:26:01 -0000	1.3
@@ -45,6 +45,7 @@
 set invoice_text [lang::util::localize "#invoices.iv_invoices_email#" $locale]
 set subject [lang::util::localize "#invoices.iv_invoices_email_subject#" $locale]
 set return_url [export_vars -base invoice-list {organization_id}]
+set cancel_url [export_vars -base invoice-list {organization_id}]
 
 if {[empty_string_p [cc_email_from_party $contact_id]]} {
     ad_return_error "No Contact" "The contact does not have a valid e-mail address. Please go back and make sure that you provide an e-mail address first."