Index: openacs-4/packages/xotcl-core/tcl/generic-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/generic-procs.tcl,v
diff -u -r1.83 -r1.84
--- openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	24 Jul 2007 20:52:16 -0000	1.83
+++ openacs-4/packages/xotcl-core/tcl/generic-procs.tcl	29 Jul 2007 21:33:25 -0000	1.84
@@ -978,7 +978,7 @@
 
     set user_id [my current_user_id]
     set page_id [my set item_id]
-    set live_revision_id [content::item::get_live_revision -item_id $page_id]
+    set live_revision_id [::xo::db::sql::content_item get_live_revision -item_id $page_id]
     my instvar package_id
     set base [$package_id url]
     set sql [::xo::db::sql select \