Index: openacs-4/packages/dotlrn/www/admin/term-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/term-new.tcl,v diff -u -N -r1.11 -r1.11.2.1 --- openacs-4/packages/dotlrn/www/admin/term-new.tcl 13 Jan 2005 13:57:21 -0000 1.11 +++ openacs-4/packages/dotlrn/www/admin/term-new.tcl 31 May 2005 23:13:07 -0000 1.11.2.1 @@ -55,10 +55,6 @@ { [template::util::date::compare $start_date $end_date] <= 0 } "The term must start before it ends" } - {end_date - { [template::util::date::compare [template::util::date::from_ansi [clock format [clock seconds] -format "%Y-%m-%d"]] $end_date] <= 0 } - "The term must end in the future" - } } -on_submit { # Setting the rigth format to send to the procedures