Index: openacs-4/packages/dotlrn/tcl/term-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/term-procs.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/dotlrn/tcl/term-procs.tcl	8 Aug 2006 21:26:23 -0000	1.10
+++ openacs-4/packages/dotlrn/tcl/term-procs.tcl	8 Nov 2010 13:17:44 -0000	1.11
@@ -41,6 +41,7 @@
         set start_date "[template::util::date::get_property year $start_date] [template::util::date::get_property month $start_date] [template::util::date::get_property day $start_date]"
         set end_date "[template::util::date::get_property year $end_date] [template::util::date::get_property month $end_date] [template::util::date::get_property day $end_date]"
         set date_format [get_date_format]
+        set term_id [db_nextval acs_object_id_seq]
 
         db_dml insert_term {}
     }