Forum OpenACS Development: Re: Does Calendar pkg support multiple private calendar?

Collapse
Posted by Iuri Sampaio on
so far, I went through the source code, starting at include src=“cal-option” , line 40, cal-options.adp

Then, set calendar_list [calendar::calendar_list] line 24, cal-options.tcl

and, set new_list [db_list_of_lists select_calendar_list {}] line 328, calendar-procs.tcl

fullquery statement, name="calendar::calendar_list.select_calendar_list" leads back to TCL file, respectively $permission_clause, which is empty as well as $privilege

select calendar_name,
calendar_id,
acs_permission__permission_p(calendar_id, :user_id, 'calendar_admin') as calendar_admin_p
from calendars
where (private_p = 'f' and package_id = :package_id $permissions_clause) or
(private_p = 't' and owner_id = :user_id)
order by private_p asc, upper(calendar_name)

I wrote ns_logs within ad_proc calendar_list and noticed neither $permission_clause nor $privilege were assigned (i.e. they were null).

[08/Jul/2018:07:25:49][2783.7fe0b0a3d700][-conn:evex:5:4249-] Notice: Running ad_proc calendar::calendar_list | |
[08/Jul/2018:07:25:49][2783.7fe0b0a3d700][-conn:evex:5:4250-] Error: Could not read file /var/www/evex/content-reposito

I’ve tried to grant permissions on calendar’s package apm permission UI.

However, I didn’t find a potential candidate of permission for such a specific granularity, which I would call calendar_shared_read, calendar_shared_write, calendar_shared_admin, …

It'd be even better if permissions such as calendar_read, calendar_show, … could serve to all types: private and shared.

/permissions/grant?application_url=&object_id=1291