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 -N -r1.2 -r1.2.2.1 --- openacs-4/packages/acs-subsite/tcl/application-group-procs.xql 15 May 2001 16:59:00 -0000 1.2 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs.xql 10 Apr 2002 02:26:20 -0000 1.2.2.1 @@ -1,7 +1,7 @@ - + select substr(instance_name, 1, 90) @@ -11,5 +11,16 @@ + + + + + select parent_id + from site_nodes + where object_id = :package_id + + + +