Index: openacs-4/packages/xowiki/www/revisions.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/Attic/revisions.tcl,v diff -u -N --- openacs-4/packages/xowiki/www/revisions.tcl 26 Jul 2006 22:56:46 -0000 1.5 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,29 +0,0 @@ -ad_page_contract { - display information about revisions of content items - - @author Gustaf Neumann (gustaf.neumann@wu-wien.ac.at) - @creation-date Oct 23, 2005 - @cvs-id $Id: revisions.tcl,v 1.5 2006/07/26 22:56:46 gustafn Exp $ -} { -} -properties { - name:onevalue - context:onevalue - page_id:onevalue - revisions:multirow - gc_comments:onevalue -} - - -# most things happen in the adp-include file from xotcl-core - -# stuff for general comments -set return_url [ad_conn url]?[export_vars page_id] -if { [apm_package_installed_p "general-comments"] && - [ad_parameter "GeneralCommentsP" -package_id [ad_conn package_id]] } { - set gc_link [general_comments_create_link $page_id $return_url] - set gc_comments [general_comments_get_comments $page_id $return_url] -} else { - set gc_link "" - set gc_comments "" -} -