Index: openacs-4/packages/xowiki/www/make-live-revision.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/Attic/make-live-revision.tcl,v diff -u -N --- openacs-4/packages/xowiki/www/make-live-revision.tcl 26 Jul 2006 22:56:46 -0000 1.6 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,13 +0,0 @@ -ad_page_contract { - make file_id of content repository to current revision - - @author Gustaf Neumann (gustaf.neumann@wu-wien.ac.at) - @creation-date Oct 23, 2005 - @cvs-id $Id: make-live-revision.tcl,v 1.6 2006/07/26 22:56:46 gustafn Exp $ -} - -db_exec_plsql make_live { - select content_item__set_live_revision(:revision_id) -} -ns_cache flush xotcl_object_cache ::$page_id -ad_returnredirect [export_vars -base revisions {page_id name}] \ No newline at end of file