Index: openacs.org-dev/packages/cms/www/modules/items/revision-add-1.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/cms/www/modules/items/revision-add-1.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/cms/www/modules/items/revision-add-1.tcl	9 Jul 2002 17:35:03 -0000	1.1.1.1
+++ openacs.org-dev/packages/cms/www/modules/items/revision-add-1.tcl	8 Oct 2002 15:47:02 -0000	1.1.1.2
@@ -8,14 +8,8 @@
 # check permissions
 content::check_access $item_id cm_write -user_id [User::getID]
 
-template::query get_content_type content_type onevalue "
-  select
-    content_item.get_content_type( :item_id )
-  from
-    dual
-" 
+set content_type [db_string get_content_type ""]
 
-
 # flush the sitemap folder listing cache in anticipation 
 # of the new item
 cms_folder::flush sitemap $item_id
@@ -27,16 +21,8 @@
     template::forward "custom/$content_type/revision-add-1?item_id=$item_id"
 }
 
+set name [db_string get_name ""]
 
-template::query get_name name onevalue "
-  select
-    name
-  from
-    cr_items
-  where
-    item_id = :item_id"
-
-
 # if we have an invalid item_id, then throw error
 if { [template::util::is_nil name] } {
     template::request::error bad_item_id \