Index: openacs-4/packages/acs-subsite/lib/user-subsites.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-subsites.adp,v
diff -u -r1.1.18.3 -r1.1.18.4
--- openacs-4/packages/acs-subsite/lib/user-subsites.adp 24 Apr 2017 13:19:42 -0000 1.1.18.3
+++ openacs-4/packages/acs-subsite/lib/user-subsites.adp 27 Apr 2017 07:25:29 -0000 1.1.18.4
@@ -2,7 +2,7 @@
#acs-subsite.You_are_in_the_follow#
- - @groups.group_name@
+
- @groups.group_name@@groups.group_name@
(@groups.member_state_pretty@)
[#acs-kernel.common_Administration#]
Index: openacs-4/packages/acs-subsite/lib/user-subsites.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-subsites.tcl,v
diff -u -r1.1.18.3 -r1.1.18.4
--- openacs-4/packages/acs-subsite/lib/user-subsites.tcl 24 Apr 2017 13:19:42 -0000 1.1.18.3
+++ openacs-4/packages/acs-subsite/lib/user-subsites.tcl 27 Apr 2017 07:25:29 -0000 1.1.18.4
@@ -13,8 +13,11 @@
} {
set admin_p [permission::permission_p -party_id $user_id -object_id $group_id -privilege "admin"]
set member_state_pretty [group::get_member_state_pretty -member_state $member_state]
- #set url [apm_package_url_from_id $package_id]
- set url ""
+ if {$package_id ne "" && $group_id != [acs_magic_object registered_users]} {
+ set url [apm_package_url_from_id $package_id]
+ } else {
+ set url ""
+ }
set admin_url [export_vars -base /members/ {{group_id $group_id}}]
}