Index: openacs-4/packages/invoices/www/offer-accept-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/offer-accept-2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/invoices/www/offer-accept-2.tcl	16 Aug 2005 20:04:34 -0000	1.1
+++ openacs-4/packages/invoices/www/offer-accept-2.tcl	6 Sep 2005 23:01:24 -0000	1.2
@@ -17,7 +17,10 @@
 db_1row offer_data {}
 
 set party_ids [contact::util::get_employees -organization_id $organization_id]
+set project_id [lindex [application_data_link::get_linked -from_object_id $offer_id -to_object_type content_item] 0]
 
+db_1row project_data {}
+
 set context [list [list [export_vars -base offer-list {organization_id}] "[_ invoices.iv_offer_2]"] [list [export_vars -base offer-ae {offer_id}] "[_ invoices.iv_offer_View]"] $page_title]
 
 # set offer_text [iv::offer::text -offer_id $offer_id]