Index: openacs-4/packages/acs-subsite/www/admin/site-map/package-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/package-new.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/admin/site-map/package-new.tcl	20 Dec 2002 13:58:16 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/admin/site-map/package-new.tcl	16 Jan 2003 13:40:07 -0000	1.6
@@ -15,6 +15,11 @@
     root_id:integer,optional
 }
 
+if { [string equal $package_key "/new"] } {
+    ad_returnredirect "/acs-admin/apm/packages-install"
+    ad_script_abort
+}
+
 set context_id [db_string context_id {
     select parent.object_id as context_id
     from   site_nodes parent, site_nodes child