Index: openacs-4/packages/contacts/tcl/contacts-populate-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-populate-procs.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/contacts/tcl/contacts-populate-procs.tcl	12 Oct 2005 22:03:22 -0000	1.13
+++ openacs-4/packages/contacts/tcl/contacts-populate-procs.tcl	12 Oct 2005 22:09:42 -0000	1.14
@@ -52,6 +52,7 @@
     lang::message::register -update_sync de_DE acs-translations "group_title_${leads_id}" "Leads"
 
     contact::group::map -group_id $customers_id -package_id $contacts_package_id
+    contact::group::map -group_id $leads_id -package_id $contacts_package_id
 
     # Hopefully all is now setup to map the groups accordingly.