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.39.2.11 -r1.39.2.12 --- openacs-4/packages/calendar/tcl/calendar-procs.tcl 9 Feb 2023 17:00:59 -0000 1.39.2.11 +++ openacs-4/packages/calendar/tcl/calendar-procs.tcl 14 Feb 2023 08:41:10 -0000 1.39.2.12 @@ -134,13 +134,12 @@ If the revoke is set, then the given permission will be removed for the party. } { - # default privilege is being able to read + # Default privilege is being able to read. - # if the permission is public, oassign the magic object - # and set permission to read + # If the permission is public, assign the magic object and set + # permission to read. if {$cal_privilege eq "public"} { - set party_id [acs_magic_object "the_public"] set cal_privilege "calendar_read" } elseif {$cal_privilege eq "private"} {