Index: openacs-4/packages/acs-subsite/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/index.tcl,v diff -u -r1.21 -r1.22 --- openacs-4/packages/acs-subsite/www/index.tcl 10 Jan 2007 21:22:06 -0000 1.21 +++ openacs-4/packages/acs-subsite/www/index.tcl 7 Aug 2017 23:47:58 -0000 1.22 @@ -53,8 +53,9 @@ set show_members_list_to [parameter::get -parameter "ShowMembersListTo" -default 2] set show_members_page_link_p \ - [expr {$admin_p || ($user_id != 0 && $show_members_list_to ==1) || \ - $show_members_list_to == 0 }] + [expr {$admin_p + || ($user_id != 0 && $show_members_list_to ==1) + || $show_members_list_to == 0 }] # User's group membership @@ -65,3 +66,9 @@ set group_admin_p [group::admin_p -group_id $group_id -user_id $user_id] set can_join_p [expr {!$group_admin_p && $group_member_p == 0 && $user_id != 0 && $group_join_policy ne "closed" }] + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: