Index: openacs-4/contrib/packages/events/tcl/events-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/events/tcl/events-procs.tcl,v diff -u -r1.1 -r1.1.4.1 --- openacs-4/contrib/packages/events/tcl/events-procs.tcl 9 Mar 2003 12:07:42 -0000 1.1 +++ openacs-4/contrib/packages/events/tcl/events-procs.tcl 12 Nov 2004 18:19:27 -0000 1.1.4.1 @@ -205,16 +205,16 @@ reg_deadline { set raw_date [db_string select_reg_deadline {}] } + } - return [template::util::date::create \ + return [template::util::date::create \ [lindex $raw_date 0] \ [lindex $raw_date 1] \ [lindex $raw_date 2] \ [lindex $raw_date 3] \ [lindex $raw_date 4] \ $date_format \ - ] - } + ] } ad_proc -public toggle_available_p {