Index: openacs-4/packages/new-portal/www/portal-update-name.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/Attic/portal-update-name.tcl,v
diff -u -N
--- openacs-4/packages/new-portal/www/portal-update-name.tcl	24 Oct 2001 15:47:03 -0000	1.1
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,13 +0,0 @@
-# www/portal-update-name.tcl
-ad_page_contract {
-    Update the portal's name
-} {
-    portal_id:naturalnum,notnull
-    new_name:trim,notnull,nohtml
-}
-
-portal::update_name $portal_id $new_name
-
-ad_returnredirect "portal-config?[export_url_vars portal_id]"
-
-