Index: openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.tcl,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.tcl	13 Jan 2005 13:54:34 -0000	1.2
+++ openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.tcl	29 Dec 2005 13:54:04 -0000	1.2.2.1
@@ -25,6 +25,8 @@
 	    link_url_col user_url
 	    link_html {user_id}
 	}
+	email {label "EMail"
+	}
 
     }
 
Index: openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.xql,v
diff -u -r1.2 -r1.2.2.1
--- openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.xql	13 Jan 2005 13:54:34 -0000	1.2
+++ openacs-4/contrib/packages/mailing-lists/www/madmin/list-subscribers.xql	29 Dec 2005 13:54:04 -0000	1.2.2.1
@@ -4,10 +4,12 @@
 <fullquery name="subscribers">
       <querytext>
       
-select user_id, person__name(user_id) as full_name 
-                                     from ml_mailing_list_user_map 
+select user_id, person__name(user_id) as full_name, email
+                                     from ml_mailing_list_user_map mlum,
+                                     parties p
                                      where list_id = :list_id
                                      and subscribed_p = 't'
+				     and p.party_id = mlum.user_id
       </querytext>
 </fullquery>