Index: openacs-4/packages/acs-subsite/tcl/application-group-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/Attic/application-group-procs.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-subsite/tcl/application-group-procs.xql	6 May 2001 21:40:21 -0000	1.1
+++ openacs-4/packages/acs-subsite/tcl/application-group-procs.xql	15 May 2001 16:59:00 -0000	1.2
@@ -4,7 +4,7 @@
 <fullquery name="new.group_name_query">      
       <querytext>
       
-		select substr(instance_name from 1 for 90)
+		select substr(instance_name, 1, 90)
 		from apm_packages
 		where package_id = :package_id