Index: openacs-4/packages/contacts/www/complaint-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/complaint-ae.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/contacts/www/complaint-ae.tcl	10 Aug 2005 19:37:21 -0000	1.1
+++ openacs-4/packages/contacts/www/complaint-ae.tcl	11 Aug 2005 08:24:53 -0000	1.2
@@ -19,7 +19,7 @@
 
 if {![empty_string_p $project_id]} {
     if {[empty_string_p $customer_id]} {
-        set customer_id [db_string get_customer_id "select customer_id from pm_projectsx where project_id = :project_id"]
+        set customer_id [db_string get_customer_id "select customer_id from pm_projectsx where item_id = :project_id"]
     }
 }