Index: openacs-4/packages/dynamic-types/tcl/form-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/tcl/form-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dynamic-types/tcl/form-procs.tcl	15 Feb 2005 13:55:34 -0000	1.2
+++ openacs-4/packages/dynamic-types/tcl/form-procs.tcl	18 Feb 2005 17:54:18 -0000	1.3
@@ -360,7 +360,7 @@
                     values 
                     (:item_id, [join $values ", "])"
             } else { 
-                set latest_revision [db_map latest_revision]
+                set latest_revision [content::item::get_latest_revision -item_id $item_id]
 
                 db_dml insert_statement "
                     insert into ${type_info(table_name)}i