Index: openacs-4/packages/invoices/www/offer-send.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/offer-send.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/invoices/www/offer-send.tcl	7 Apr 2006 13:46:37 -0000	1.19
+++ openacs-4/packages/invoices/www/offer-send.tcl	10 Apr 2006 06:21:58 -0000	1.20
@@ -6,6 +6,7 @@
 } {
     offer_id:integer
     {return_url ""}
+    {type ""}
 } -properties {
     context:onevalue
     page_title:onevalue
@@ -30,7 +31,7 @@
 set accept_link [export_vars -base "[ad_url][ad_conn package_url]offer-accepted" {x {offer_id $offer_rev_id}}]
 content::item::set_live_revision -revision_id $offer_rev_id
 
-if {[empty_string_p $accepted_date]} {
+if {[empty_string_p $accepted_date] || $type == "offer"} {
     # send pending offer
     set offer_text "#invoices.iv_offer_email#"
     set subject [lang::util::localize "#invoices.iv_offer_email_subject#" $locale]