Index: openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl,v
diff -u -N -r1.12.2.2 -r1.12.2.3
--- openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl	3 Mar 2020 16:11:12 -0000	1.12.2.2
+++ openacs-4/packages/acs-subsite/tcl/group-type-procs.tcl	3 Mar 2020 18:38:15 -0000	1.12.2.3
@@ -86,7 +86,7 @@
         # unique group_id primary key
 
         set id_column [db_string select_group_id_column {
-            select upper(id_column) from acs_object_types where object_type='group'
+            select id_column from acs_object_types where object_type='group'
         }]
         set package_name [string tolower $group_type]