Index: openacs-4/packages/dotlrn/www/members-chunk-table-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk-table-oracle.xql,v
diff -u -r1.4.2.1 -r1.4.2.2
--- openacs-4/packages/dotlrn/www/members-chunk-table-oracle.xql	13 May 2004 12:38:03 -0000	1.4.2.1
+++ openacs-4/packages/dotlrn/www/members-chunk-table-oracle.xql	13 May 2004 13:39:04 -0000	1.4.2.2
@@ -11,7 +11,9 @@
                    dotlrn_member_rels_approved.user_id,
                    acs_users_all.first_names,
                    acs_users_all.last_name,
-                   acs_users_all.email
+                   acs_users_all.email,
+                   (select count(*) from acs_rels where rel_type = 'user_portrait_rel' and object_id_one = dotlrn_member_rels_approved.user_id) as portrait_p,
+                   (select count(*) from acs_attribute_values where object_id = dotlrn_member_rels_approved.user_id and attribute_id = :bio_attribute_id and attr_value != '') as bio_p
             from acs_users_all,
                  dotlrn_member_rels_approved
             where dotlrn_member_rels_approved.community_id = :community_id
Index: openacs-4/packages/dotlrn/www/members-chunk-table-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk-table-postgresql.xql,v
diff -u -r1.3.2.1 -r1.3.2.2
--- openacs-4/packages/dotlrn/www/members-chunk-table-postgresql.xql	13 May 2004 12:38:03 -0000	1.3.2.1
+++ openacs-4/packages/dotlrn/www/members-chunk-table-postgresql.xql	13 May 2004 13:39:04 -0000	1.3.2.2
@@ -11,7 +11,9 @@
                    dotlrn_member_rels_approved.user_id,
                    acs_users_all.first_names,
                    acs_users_all.last_name,
-                   acs_users_all.email
+                   acs_users_all.email,
+                   (select count(*) from acs_rels where rel_type = 'user_portrait_rel' and object_id_one = dotlrn_member_rels_approved.user_id) as portrait_p,
+                   (select count(*) from acs_attribute_values where object_id = dotlrn_member_rels_approved.user_id and attribute_id = :bio_attribute_id and attr_value != '') as bio_p
             from acs_users_all,
                  dotlrn_member_rels_approved
             where dotlrn_member_rels_approved.community_id = :community_id
Index: openacs-4/packages/dotlrn/www/members-chunk-table.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk-table.adp,v
diff -u -r1.14.2.1 -r1.14.2.2
--- openacs-4/packages/dotlrn/www/members-chunk-table.adp	21 Feb 2004 02:36:51 -0000	1.14.2.1
+++ openacs-4/packages/dotlrn/www/members-chunk-table.adp	13 May 2004 13:39:04 -0000	1.14.2.2
@@ -34,6 +34,7 @@
 <table  width="85%" class="table-display" cellpadding="5" cellspacing="0">
     <tr class="table-header">
       <td>&nbsp;</td>
+      <td>&nbsp;</td>
       <td><a href=@referer@?order=first_names&order_direction=@first_names_order_direction@>
 	#dotlrn.First_Name#</a> @first_names_order_html;noquote@
       </td>	
@@ -58,6 +59,11 @@
 	<input type=checkbox name=user_id value=@current_members.user_id@>
    </if>
  </td>
+  <td>
+    <if @current_members.portrait_p@ true or @current_members.bio_p@ true>
+      <a href="@current_members.community_member_url@"><img src="/resources/acs-subsite/profile-16.png" height="16" width="16" alt="@acs-subsite.Profile#" title="#acs-subsite.lt_User_has_portrait_title#" border="0"></a>
+    </if>
+  </td>
   <td><%=[acs_community_member_link -user_id  @current_members.user_id@ -label @current_members.first_names@] %></td>
   <td><%=[acs_community_member_link -user_id  @current_members.user_id@ -label @current_members.last_name@]%></td>
   <td>
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.23.2.1 -r1.23.2.2
--- openacs-4/packages/dotlrn/www/members-chunk-table.tcl	21 Feb 2004 02:36:51 -0000	1.23.2.1
+++ openacs-4/packages/dotlrn/www/members-chunk-table.tcl	13 May 2004 13:39:04 -0000	1.23.2.2
@@ -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.*,