Index: openacs-4/packages/acs-subsite/www/admin/site-map/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/index.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/acs-subsite/www/admin/site-map/index.tcl	4 Dec 2002 16:41:17 -0000	1.10
+++ openacs-4/packages/acs-subsite/www/admin/site-map/index.tcl	16 Jan 2003 13:40:07 -0000	1.11
@@ -202,6 +202,11 @@
 	doc_body_append "<option value=$package_key>$pretty_name</option>\n"
       }
 
+      # If this is a site-wide admin, offer a link to the package manager
+      if { [ad_permission_p 0 admin] } {
+          doc_body_append "<option value=\"/new\">--Install new package--</option>\n"
+      }
+
       doc_body_append "
         </select>
         </td>