Index: openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql	7 Aug 2017 23:47:58 -0000	1.3
+++ openacs-4/packages/acs-subsite/www/admin/group-types/one-oracle.xql	22 Nov 2017 14:57:42 -0000	1.4
@@ -3,19 +3,6 @@
 <queryset>
    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="select_pretty_name">      
-      <querytext>
-      
-    select t.pretty_name as group_type_pretty_name, t.dynamic_p,
-           nvl(gt.default_join_policy, 'open') as default_join_policy
-      from acs_object_types t, group_types gt
-     where t.object_type = :group_type
-       and t.object_type = gt.group_type(+)
-
-      </querytext>
-</fullquery>
-
- 
 <fullquery name="groups_select">      
       <querytext>
       
Index: openacs-4/packages/acs-subsite/www/members/member-remove.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/member-remove.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/members/member-remove.tcl	7 Aug 2017 23:47:59 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/members/member-remove.tcl	22 Nov 2017 14:57:42 -0000	1.6
@@ -11,7 +11,9 @@
 
 set group_id [application_group::group_id_from_package_id]
 
-permission::require_permission -object_id $group_id -privilege "admin"
+if {$user_id != [ad_conn user_id]} {
+    permission::require_permission -object_id $group_id -privilege "admin"
+}
 
 foreach id $user_id {
     group::remove_member \