Index: openacs-4/packages/acs-subsite/www/permissions/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/index.adp,v
diff -u -r1.7.2.1 -r1.7.2.2
--- openacs-4/packages/acs-subsite/www/permissions/index.adp	18 Jan 2017 08:05:59 -0000	1.7.2.1
+++ openacs-4/packages/acs-subsite/www/permissions/index.adp	5 Apr 2017 16:47:47 -0000	1.7.2.2
@@ -8,7 +8,12 @@
         <multiple name="objects">
 
           <li> <if @objects.object_id@ eq @root@ and @objects.context_id@ not nil> <a href="./?root=@objects.context_id@">#acs-subsite.UP#</a></if>
-          <if @objects.object_id@ ne @root@><a href="./?root=@objects.object_id@">+</a></if> <strong>@objects.name@</strong> @objects.object_type@ <a href="one?object_id=@objects.object_id@">#acs-subsite.permissions#</a></li>
+          <if @objects.object_id@ ne @root@><a href="./?root=@objects.object_id@">+</a></if>
+	  <strong>@objects.name@</strong>
+	  @objects.object_type@
+	  <if @objects.object_id@ not nil><a href="@objects.url;noi18n@">@objects.url;noi18n@</a>:
+	  </if>
+	  <a href="one?object_id=@objects.object_id@">#acs-subsite.permissions#</a></li>
 
         </multiple>
       </ul>
Index: openacs-4/packages/acs-subsite/www/permissions/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/index.tcl,v
diff -u -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/acs-subsite/www/permissions/index.tcl	28 Oct 2015 09:38:39 -0000	1.4.2.2
+++ openacs-4/packages/acs-subsite/www/permissions/index.tcl	5 Apr 2017 16:47:47 -0000	1.4.2.3
@@ -16,11 +16,17 @@
 
 set context "Permissions"
 
-if {(![info exists root] || $root eq "")} { 
+if {![info exists root] || $root eq ""} { 
     set root [ad_conn package_id]
 }
 
 db_multirow objects adminable_objects {}
+template::multirow extend objects url
+template::multirow foreach objects {
+    if {$object_type eq "apm_package"} {
+        set url [ site_node::get_url_from_object_id -object_id $object_id]
+    }
+}
 
 set security_context_root [acs_magic_object security_context_root]
 set default_context [acs_magic_object default_context]