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.5 -r1.6
--- openacs-4/packages/acs-subsite/tcl/application-group-procs.xql	28 Aug 2003 09:41:39 -0000	1.5
+++ openacs-4/packages/acs-subsite/tcl/application-group-procs.xql	3 Mar 2009 21:35:54 -0000	1.6
@@ -1,6 +1,14 @@
 <?xml version="1.0"?>
 <queryset>
 
+<fullquery name="application_group::package_id_from_group_id.get">      
+  <querytext>
+    select package_id
+    from application_groups
+    where group_id = :group_id
+  </querytext>
+</fullquery>
+
 <fullquery name="application_group::new.group_name_query">      
       <querytext>