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.13.10.1 -r1.13.10.2 --- openacs-4/packages/dotlrn/www/admin/term-new.tcl 11 Sep 2015 11:40:53 -0000 1.13.10.1 +++ openacs-4/packages/dotlrn/www/admin/term-new.tcl 9 Sep 2016 08:18:07 -0000 1.13.10.2 @@ -38,18 +38,27 @@ {label "[_ dotlrn.Start_Date]"} #{format {[lc_get formbuilder_date_format]}} {html {id start_date}} - {after_html { \[yyyy-mm-dd \] + {after_html { \[yyyy-mm-dd \] }} } {end_date:text(text) {label "[_ dotlrn.End_Date]"} #{format {[lc_get formbuilder_date_format]}} {html {id end_date}} - {after_html { \[yyyy-mm-dd \] + {after_html { \[yyyy-mm-dd \] }} } +} -on_request { + template::add_body_script -script [subst { + document.getElementById('start_date').addEventListener('click', function () { + showCalendar('start_date', 'yyyy-mm-dd'); + }); + document.getElementById('end_date').addEventListener('click', function () { + showCalendar('end_date', 'yyyy-mm-dd'); + }); + }] } -validate { {start_date { [template::util::date::compare $start_date $end_date] <= 0 }