Index: openacs-4/packages/acs-content-repository/tcl/item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/Attic/item-procs.tcl,v
diff -u -N -r1.16 -r1.17
--- openacs-4/packages/acs-content-repository/tcl/item-procs.tcl	5 Jan 2004 15:41:34 -0000	1.16
+++ openacs-4/packages/acs-content-repository/tcl/item-procs.tcl	16 Jan 2004 04:38:39 -0000	1.17
@@ -680,7 +680,7 @@
     @author Peter Marklund
 } {
     if { [empty_string_p $revision_id] } {
-        set revision_id [item::get_element -item_id $object_id -element latest_revision]
+        set revision_id [item::get_element -item_id $item_id -element latest_revision]
     }
 
     db_exec_plsql set_live {