Index: openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl,v diff -u -N -r1.19 -r1.20 --- openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 30 Apr 2018 08:51:11 -0000 1.19 +++ openacs-4/packages/acs-subsite/tcl/application-group-procs.tcl 17 Sep 2018 14:01:24 -0000 1.20 @@ -18,7 +18,7 @@ -include_self:boolean } { Determines whether the party in question (identified by party_id) is - a contained by the application group identified by package_id. + contained by the application group identified by package_id. If package_id is not specified, and we have a connection, then the proc will grab the package_id of the current package (i.e., [ad_conn package_id]). @@ -73,7 +73,7 @@ { -rel_id "" } } { Determines whether the relation in question (identified by rel_id) is - a contained by the application group identified by package_id. + contained by the application group identified by package_id. If package_id is not specified, and we have a connection, then the proc will grab the package_id of the current package (i.e., [ad_conn package_id]). @@ -219,7 +219,7 @@ # Delete permissions on: # - the application group # - any relational segment of this group - # - any relation with this gorup + # - any relation with this group # We really ought to have cascading deletes on acs_permissions.grantee_id (and object_id) db_dml delete_perms {} @@ -234,7 +234,7 @@ {-node_id ""} {-include_self:boolean} } { - Starting with the node at with given id, or at given url, + Starting with the node of the given id, or at given url, climb up the site map and return the node of the first non null application group