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.4 -r1.5
--- openacs-4/packages/xowiki/www/admin/set-publish-state.tcl	11 Apr 2007 12:36:29 -0000	1.4
+++ openacs-4/packages/xowiki/www/admin/set-publish-state.tcl	16 Apr 2007 11:15:10 -0000	1.5
@@ -19,7 +19,10 @@
 ns_cache flush xotcl_object_cache ::$item_id
 ns_cache flush xotcl_object_cache ::$revision_id
 
-::xo::db::CONTENT_ITEM MAKE_LIVE {revision_id state}
+#::xo::db::CONTENT_ITEM MAKE_LIVE {revision_id state}
+::xo::db::content_item make_live \
+            -revision_id $revision_id \
+            -state $state
 
 if {$state ne "production"} {
   ::xowiki::notification::do_notifications -revision_id $revision_id