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.2 -r1.3
--- 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	12 May 2002 20:57:02 -0000	1.3
@@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <queryset>
 
-<fullquery name="new.group_name_query">      
+<fullquery name="application_group::new.group_name_query">      
       <querytext>
       
 		select substr(instance_name, 1, 90)
@@ -11,5 +11,16 @@
       </querytext>
 </fullquery>
 
+
+<fullquery name="application_group::new.parent_node_id">      
+      <querytext>
+      
+		select parent_id
+                from site_nodes
+                where object_id = :package_id
+	    
+      </querytext>
+</fullquery>
+
  
 </queryset>