Index: openacs-4/packages/dotlrn/tcl/applets-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/applets-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/tcl/applets-procs.xql	29 Mar 2002 19:38:25 -0000	1.4
+++ openacs-4/packages/dotlrn/tcl/applets-procs.xql	13 Jul 2002 00:13:09 -0000	1.5
@@ -24,10 +24,17 @@
         <querytext>
             insert
             into dotlrn_applets
-            (applet_id, applet_key, status)
+            (applet_id, applet_key, package_key, status)
             values
-            (:applet_id, :applet_key, :status)
+            (acs_object_id_seq.nextval, :applet_key, :package_key, :active_p)
         </querytext>
     </fullquery>
 
+    <fullquery name="dotlrn_applet::list_applets_not_cached.select_dotlrn_applets">
+        <querytext>
+            select applet_key
+            from dotlrn_applets
+        </querytext>
+    </fullquery>
+
 </queryset>