Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.159 -r1.160
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Jul 2002 00:16:37 -0000	1.159
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	24 Jul 2002 15:59:37 -0000	1.160
@@ -288,7 +288,7 @@
         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 "YYYY MM DD"
 
-        db_dml set_active_dates {}
+        db_exec_plsql set_active_dates {}
     }
 
     ad_proc set_package_id {