Index: openacs-4/packages/dotlrn/tcl/applets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/applets-procs.tcl,v
diff -u -r1.22 -r1.23
--- openacs-4/packages/dotlrn/tcl/applets-procs.tcl	12 May 2010 14:15:34 -0000	1.22
+++ openacs-4/packages/dotlrn/tcl/applets-procs.tcl	8 Nov 2010 13:17:44 -0000	1.23
@@ -69,6 +69,7 @@
             return
         }
 
+        set applet_id [db_nextval acs_object_id_seq]
         db_dml insert {}
     }