Index: openacs-4/packages/dotlrn/www/my-communities-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/my-communities-oracle.xql,v
diff -u -r1.8 -r1.8.2.1
--- openacs-4/packages/dotlrn/www/my-communities-oracle.xql	31 May 2002 15:14:45 -0000	1.8
+++ openacs-4/packages/dotlrn/www/my-communities-oracle.xql	17 Oct 2002 12:54:02 -0000	1.8.2.1
@@ -14,7 +14,7 @@
                    dotlrn_member_rels_approved.rel_type,
                    dotlrn_member_rels_approved.role,
                    '' as role_pretty_name,
-                   decode(dotlrn_community.admin_p(dotlrn_communities.community_id, dotlrn_member_rels_approved.user_id),'f',0,1) as admin_p
+                   decode(dotlrn_community_admin_p(dotlrn_communities.community_id, dotlrn_member_rels_approved.user_id),'f',0,1) as admin_p
             from dotlrn_communities,
                  dotlrn_member_rels_approved
             where dotlrn_member_rels_approved.user_id = :user_id
Index: openacs-4/packages/dotlrn/www/my-communities-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/my-communities-postgresql.xql,v
diff -u -r1.1 -r1.1.2.1
--- openacs-4/packages/dotlrn/www/my-communities-postgresql.xql	15 Jul 2002 20:12:46 -0000	1.1
+++ openacs-4/packages/dotlrn/www/my-communities-postgresql.xql	17 Oct 2002 12:54:02 -0000	1.1.2.1
@@ -16,7 +16,7 @@
                    '' as role_pretty_name,
                    CASE 
                       WHEN
-                         dotlrn_community__admin_p(dotlrn_communities.community_id, 
+                         dotlrn_community_admin_p(dotlrn_communities.community_id, 
                                                    dotlrn_member_rels_approved.user_id) = 'f'
                       THEN 0
                       ELSE 1
Index: openacs-4/packages/dotlrn/www/my-communities.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/my-communities.adp,v
diff -u -r1.12 -r1.12.2.1
--- openacs-4/packages/dotlrn/www/my-communities.adp	9 Aug 2002 18:39:26 -0000	1.12
+++ openacs-4/packages/dotlrn/www/my-communities.adp	17 Oct 2002 12:54:02 -0000	1.12.2.1
@@ -26,15 +26,12 @@
     <td><a href="@communities.url@">@communities.pretty_name@</a></td>
     <td>@communities.role_pretty_name@</td>
     <td>
-      [<small>
+      <small>
 <if @communities.admin_p@ eq 1>
-        <a href="@communities.url@one-community-admin">Administer</a>
-        |
-        <a href="@communities.url@spam?community_id=@communities.community_id@&referer=@referer@">Email Members</a>
-        |
+              <a href="@communities.url@one-community-admin"><img border=0 valign="bottom" src="graphics/admin.gif" alt="Administer"></a> </td>
 </if>
-        <include src="deregister-link" url="deregister?community_id=@communities.community_id@&referer=@referer@">
-      </small>]
+<td>        <include src="deregister-link" url="deregister?community_id=@communities.community_id@&referer=@referer@"></td>
+      </small>
     </td>
   </tr>
 </multiple>