Index: openacs-4/packages/dotlrn/tcl/apm-callback-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/apm-callback-procs.xql,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/dotlrn/tcl/apm-callback-procs.xql	29 Mar 2007 02:35:32 -0000	1.1.2.1
+++ openacs-4/packages/dotlrn/tcl/apm-callback-procs.xql	30 Mar 2007 03:26:21 -0000	1.1.2.2
@@ -2,6 +2,14 @@
 
 <queryset>
 
+  <fullquery name="dotlrn::apm::after_instantiate.select_st_id">
+    <querytext>
+       select site_template_id
+       from dotlrn_site_templates
+       where pretty_name = :default_template_name
+    </querytext>
+  </fullquery>
+
   <fullquery name="dotlrn::apm::after_upgrade.get_default_values">
     <querytext>
       select default_value