Index: openacs-4/packages/ecommerce/tcl/ecommerce-state-changes-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/tcl/ecommerce-state-changes-procs.tcl,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/ecommerce/tcl/ecommerce-state-changes-procs.tcl	24 Feb 2005 13:33:13 -0000	1.8
+++ openacs-4/packages/ecommerce/tcl/ecommerce-state-changes-procs.tcl	31 May 2005 23:13:14 -0000	1.8.2.1
@@ -134,6 +134,15 @@
 	update ec_orders 
 	set order_state = 'confirmed', confirmed_date = sysdate 
 	where order_id = :order_id"
+
+    # Call after-checkout callback
+    db_foreach products {
+	select product_id, price_charged
+	from ec_items
+	where order_id = :order_id
+    } {
+	callback -- ecommerce::after-checkout -user_id $user_id -product_id $product_id -price $price_charged
+    }
 }
 
 ad_proc ec_apply_gift_certificate_balance {