Index: openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl,v
diff -u -r1.10 -r1.10.2.1
--- openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl	4 Dec 2002 09:50:08 -0000	1.10
+++ openacs-4/packages/dotlrn-portlet/www/dotlrn-members-portlet.tcl	26 Nov 2003 16:22:00 -0000	1.10.2.1
@@ -38,3 +38,8 @@
 template::util::list_of_ns_sets_to_multirow \
     -rows [dotlrn_community::list_users $community_id] \
     -var_name "users"
+
+template::multirow foreach users { 
+    set role [dotlrn_community::get_role_pretty_name -community_id $community_id -rel_type $rel_type]
+}
+