Index: openacs-4/packages/contacts/lib/contact-master.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contact-master.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/contacts/lib/contact-master.tcl	7 Jun 2005 07:45:39 -0000	1.8
+++ openacs-4/packages/contacts/lib/contact-master.tcl	20 Jun 2005 15:31:21 -0000	1.9
@@ -30,15 +30,9 @@
     lappend link_list "${prefix}"
     lappend link_list "[_ contacts.Summary_View]"
 
-    lappend link_list "${prefix}groups"
-    lappend link_list "[_ contacts.Groups]"
-
     lappend link_list "${prefix}relationships"
     lappend link_list "[_ contacts.Relationships]"
 
-    lappend link_list "${prefix}comments"
-    lappend link_list "[_ contacts.Comments]"
-
     lappend link_list "${prefix}files"
     lappend link_list "[_ contacts.Files]"
 
@@ -57,10 +51,6 @@
 #    lappend link_list "/contacts/contact-history"
 #    lappend link_list "History"
 
-
-
-
-
 # Convert the list to a multirow and add the selected_p attribute
 multirow create links label url selected_p
 
@@ -76,18 +66,9 @@
 
     multirow append links $label [subst $url] $selected_p
 }
-
-
-
-
-
+ 
 if { [contact::type -party_id $party_id] == "person" } {
     set public_url [acs_community_member_url -user_id $party_id]
 }
 
-
-
-
-
-
 ad_return_template