Index: openacs-4/packages/invoices/tcl/iv-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/tcl/iv-install-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/invoices/tcl/iv-install-procs.tcl	26 Oct 2005 12:33:37 -0000	1.6
+++ openacs-4/packages/invoices/tcl/iv-install-procs.tcl	15 Dec 2005 18:58:43 -0000	1.7
@@ -130,6 +130,7 @@
     set cost_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Costs Default Object"]] acs_object]
     set offer_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Offers Default Object"]] acs_object]
     set offer_item_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Offer Items Default Object"]] acs_object]
+    set offer_item_title_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Offer Items Title Default Object"]] acs_object]
     set invoice_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Invoices Default Object"]] acs_object]
     set invoice_item_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Invoice Items Default Object"]] acs_object]
     set payment_id [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Payments Default Object"]] acs_object]
@@ -141,6 +142,7 @@
 	-cost_id $cost_id \
 	-offer_id $offer_id \
 	-offer_item_id $offer_item_id \
+	-offer_item_title_id $offer_item_title_id \
 	-invoice_id $invoice_id \
 	-invoice_item_id $invoice_item_id \
 	-payment_id $payment_id
@@ -247,6 +249,27 @@
 		    }
 		}
 	    }
+	    0.01d19 0.01d20 {
+		foreach package_id [apm_package_id_from_key invoices] {
+		    array set objects [iv::util::get_default_objects -package_id $package_id]
+
+		    set objects(invoice_item_id) [package_instantiate_object -package_name acs_object -var_list [list [list new__context_id $package_id] [list new__package_id $package_id] [list new__title "Invoice Items Default Object"]] acs_object]
+
+		    iv::util::set_default_objects \
+			-package_id $package_id \
+			-list_id $objects(list_id) \
+			-price_id $objects(price_id) \
+			-cost_id $objects(cost_id) \
+			-offer_id $objects(offer_id) \
+			-offer_item_id $objects(offer_item_id) \
+			-offer_item_title_id $objects(offer_item_title_id) \
+			-invoice_id $objects(invoice_id) \
+			-invoice_item_id $objects(invoice_item_id) \
+			-payment_id $objects(payment_id)
+
+		    array unset objects
+		}
+	    }
 	}
 }