Index: openacs-4/contrib/packages/room-reservation/www/reservation-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/room-reservation/www/reservation-new.tcl,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/contrib/packages/room-reservation/www/reservation-new.tcl 12 Jul 2004 22:08:42 -0000 1.2.2.1 +++ openacs-4/contrib/packages/room-reservation/www/reservation-new.tcl 3 Mar 2005 17:28:09 -0000 1.2.2.2 @@ -21,6 +21,7 @@ set user_id [ad_maybe_redirect_for_registration] +permission::require_write_permission -object_id $room_id room-reservation::get_ui_params -rooms_pretty_name rooms_pretty_name -rooms_pretty_plural rooms_pretty_plural set room_full_name [room-reservation::rooms::get_full_name -room_id $room_id] @@ -125,6 +126,9 @@ set start_date [calendar::to_sql_datetime -date $date -time $start_time] set end_date [calendar::to_sql_datetime -date $date -time $end_time] + ns_log Notice "START_DATE: $start_date" + ns_log Notice "END_DATE: $end_date" + if {![room-reservation::datetime::check_valid_end_date_p -date $end_date]} { element set_error reservation date "[_ room-reservation.lt_End_date_and_time_has]" set form_submit 0