Index: openacs-4/packages/contacts/tcl/contacts-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contacts-callback-procs.tcl,v
diff -u -r1.43 -r1.44
--- openacs-4/packages/contacts/tcl/contacts-callback-procs.tcl	28 May 2006 01:50:21 -0000	1.43
+++ openacs-4/packages/contacts/tcl/contacts-callback-procs.tcl	29 May 2006 21:50:18 -0000	1.44
@@ -875,11 +875,9 @@
     {-object_type}
 } {
 } {
-    ns_log notice "starting groups impl"
     set groups_list [list]
     foreach group [contact::groups_list -package_id $package_id] {
 	util_unlist $group group_id group_name member_count component_count mapped_p default_p
-	# ns_log notice "$mapped_p $group_name"
 	if { [string is true $mapped_p] } {
 	    if { [permission::permission_p -object_id $group_id -party_id $user_id -privilege "read"] } {
 		lappend groups_list [list $group_id $group_name]
@@ -893,7 +891,6 @@
 	    template::multirow append $multirow groups groups $groups_pretty $group_id $group_name
 	}
     }
-    ns_log notice "ending groups impl..."
 }
 
 ad_proc -public -callback contacts::redirect -impl contactspdfs {
Index: openacs-4/packages/contacts/www/group-party-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/group-party-add.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/contacts/www/group-party-add.tcl	24 Apr 2006 21:14:47 -0000	1.8
+++ openacs-4/packages/contacts/www/group-party-add.tcl	29 May 2006 21:50:19 -0000	1.9
@@ -24,7 +24,6 @@
 	set rel_type "membership_rel"
     }
 }
-ns_log notice "\#\#\# rel_type $rel_type"
 if {$rel_type == "organization_rel"} {
     set user_id [ad_conn user_id]
     set ip_addr [ad_conn peeraddr]