Index: openacs.org-dev/packages/cms/www/modules/sitemap/attributes.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/cms/www/modules/sitemap/attributes.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/cms/www/modules/sitemap/attributes.tcl	9 Jul 2002 17:35:04 -0000	1.1.1.1
+++ openacs.org-dev/packages/cms/www/modules/sitemap/attributes.tcl	8 Oct 2002 15:47:02 -0000	1.1.1.2
@@ -19,9 +19,7 @@
 cms_folder::get_registered_types $folder_id multirow content_types
 
 # Get other misc values
-template::query get_folder_name folder_name onevalue "
-  select label from cr_folders where folder_id = :folder_id
-" 
+set folder_name [db_string get_folder_name ""]
 
 set page_title "Folder Attributes - $folder_name"
 set register_marked_content_types \
@@ -38,16 +36,8 @@
 
 
 # Determine registered types
-template::query get_options folder_options onerow "
-  select
-    content_folder.is_registered(:folder_id,'content_folder') allow_subfolders,
-    content_folder.is_registered(:folder_id,'content_symlink') allow_symlinks,
-    content_folder.is_registered(:folder_id,'content_template') allow_templates
-  from dual
-" 
+db_1row get_options "" -column_array folder_options
 
-
-
 # Create the form for registering special types to the folder
 form create register_types