Index: openacs-4/packages/calendar/tcl/calendar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/calendar-procs.tcl,v diff -u -r1.34 -r1.35 --- openacs-4/packages/calendar/tcl/calendar-procs.tcl 22 Jun 2015 21:20:27 -0000 1.34 +++ openacs-4/packages/calendar/tcl/calendar-procs.tcl 7 Aug 2017 23:48:05 -0000 1.35 @@ -39,7 +39,7 @@ set hours $event_time_arr(hours) set minutes $event_time_arr(minutes) - # AM/PM? (ben - openacs fix) + # AM/PM? (ben - OpenACS fix) if {[info exists event_time_arr(ampm)]} { if {$event_time_arr(ampm)} { if {$hours < 12} { @@ -155,8 +155,8 @@ {-calendar_id_list {}} {-party_id party_id } } { - check to see if ther user have a private calendar - if -return_id is 1, then proc will return the calendar_id + Check to see if the user has a private calendar. + When the provided -return_id is 1, then proc will return the calendar_id @param calendar_id_list If you supply the calendar_id_list, then we'll only search for a personal calendar among the calendars supplied here. @@ -529,3 +529,9 @@ } + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: