Index: openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	8 Aug 2006 21:26:28 -0000	1.27
+++ openacs-4/packages/dotlrn/www/admin/class-instance-new.tcl	15 Dec 2006 22:45:22 -0000	1.28
@@ -111,11 +111,7 @@
     # But this would involve too much code changes at the moment, so we stick with this for 
     # the time being :-) MS (openacs@sussdorff.de)
 
-    db_dml update_community_info {update dotlrn_communities_all
-	set active_start_date = :active_start_date,
-	active_end_date = :active_end_date
-	where community_id = :class_instance_id
-    }
+    db_dml update_community_info {}
 
     if {[empty_string_p $referer]} {
         set referer "class?class_key=$class_key"
@@ -138,4 +134,4 @@
                      [list "class?class_key=$class_key" $pretty_name] \
                      [_ dotlrn.new_class_instance]]
 
-set class_name $pretty_name
\ No newline at end of file
+set class_name $pretty_name