Index: openacs-4/packages/cms/www/modules/sitemap/create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/sitemap/create.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/cms/www/modules/sitemap/create.tcl	19 Aug 2002 03:54:52 -0000	1.4
+++ openacs-4/packages/cms/www/modules/sitemap/create.tcl	16 Nov 2004 22:32:50 -0000	1.5
@@ -13,7 +13,7 @@
 
 
 # permissions check - user must have cm_new on parent
-content::check_access $create_parent_id cm_new -user_id [User::getID] 
+content::check_access $create_parent_id cm_new -user_id [auth::require_login] 
 
 # Get the path
 set path [db_string get_path ""]
@@ -23,7 +23,7 @@
 form create add_folder
 
 element create add_folder parent_id \
-  -label "Parent ID" -datatype keyword -widget hidden -param -optional
+  -label "Parent ID" -integer keyword -widget hidden -param -optional
 
 element create add_folder mount_point \
   -label "Mount Point" -datatype keyword -widget hidden -param -optional