Index: openacs-4/packages/acs-tcl/tcl/acs-permissions-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-permissions-procs.tcl,v
diff -u -r1.33.2.5 -r1.33.2.6
--- openacs-4/packages/acs-tcl/tcl/acs-permissions-procs.tcl	14 Jul 2016 18:00:54 -0000	1.33.2.5
+++ openacs-4/packages/acs-tcl/tcl/acs-permissions-procs.tcl	26 Jan 2017 09:31:21 -0000	1.33.2.6
@@ -133,9 +133,6 @@
 }
 
 
-# accepts nocache to match permission_p arguments 
-# since we alias it to permission::permission_p if
-# caching disabled.
 ad_proc -private permission::permission_p_not_cached {
     {-no_cache:boolean}
     {-party_id ""}
@@ -144,13 +141,17 @@
 } {
     does party X have privilege Y on object Z
 
+    This function accepts "-no_cache" just to match the permission_p
+    signature since we alias it to permission::permission_p when
+    caching is disabled.
+
     @see permission::permission_p
 } {
     if { $party_id eq "" } {
         set party_id [ad_conn user_id]
     }
 
-    # We have a thread-local cache here
+    # We have a per-request cache here
     global permission__permission_p__cache
     if { ![info exists permission__permission_p__cache($party_id,$object_id,$privilege)] } {
         set permission__permission_p__cache($party_id,$object_id,$privilege) [db_string select_permission_p {