Index: openacs-4/packages/xowiki/www/admin/set-publish-state.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/admin/set-publish-state.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/xowiki/www/admin/set-publish-state.tcl	4 Mar 2007 21:49:11 -0000	1.3
+++ openacs-4/packages/xowiki/www/admin/set-publish-state.tcl	11 Apr 2007 12:36:29 -0000	1.4
@@ -19,7 +19,7 @@
 ns_cache flush xotcl_object_cache ::$item_id
 ns_cache flush xotcl_object_cache ::$revision_id
 
-db_0or1row make_live {select content_item__set_live_revision(:revision_id,:state)}
+::xo::db::CONTENT_ITEM MAKE_LIVE {revision_id state}
 
 if {$state ne "production"} {
   ::xowiki::notification::do_notifications -revision_id $revision_id