Index: openacs-4/packages/dotlrn/www/members-chunk-table.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk-table.tcl,v
diff -u -r1.24 -r1.25
--- openacs-4/packages/dotlrn/www/members-chunk-table.tcl	20 Apr 2004 21:13:20 -0000	1.24
+++ openacs-4/packages/dotlrn/www/members-chunk-table.tcl	17 May 2004 15:15:02 -0000	1.25
@@ -98,6 +98,13 @@
     }
 }
 
+set bio_attribute_id [db_string bio_attribute_id {
+    select attribute_id
+    from acs_attributes
+    where object_type = 'person'
+    and attribute_name = 'bio'
+}]
+
 # vars to carry over (from previous script)
 # Do a special clause for role!
 
@@ -113,7 +120,9 @@
 
 set order_by "$order $order_direction"
 
-db_multirow current_members select_current_members {}
+db_multirow -extend { community_member_url } current_members select_current_members {} {
+    set community_member_url [acs_community_member_url -user_id $user_id]
+}
 
 db_multirow pending_users select_pending_users {
     select dotlrn_users.*,