Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v diff -u -N -r1.184 -r1.185 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 3 Oct 2008 11:28:17 -0000 1.184 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 5 Oct 2008 01:50:44 -0000 1.185 @@ -1372,9 +1372,11 @@ my instvar package_id name item_id set context [list [list [$package_id url] $name ] [_ xotcl-core.revisions]] set title "[_ xotcl-core.revision_title] '$name'" + ::xo::Page set_property doc title $title set content [next] + array set property_doc [::xo::Page get_property doc] $package_id return_page -adp /packages/xowiki/www/revisions -variables { - content context {page_id $item_id} title + content context {page_id $item_id} title property_doc } } @@ -1489,11 +1491,13 @@ set title "Differences for [my set name]" set context [list $title] - set content [::xowiki::html_diff $text2 $text1] + ::xo::Page set_property doc title $title + array set property_doc [::xo::Page get_property doc] + $package_id return_page -adp /packages/xowiki/www/diff -variables { content title context - time1 time2 user1 user2 revision_id1 revision_id2 + time1 time2 user1 user2 revision_id1 revision_id2 property_doc } } Index: openacs-4/packages/xowiki/www/diff.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/diff.adp,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/xowiki/www/diff.adp 12 Dec 2006 09:34:39 -0000 1.2 +++ openacs-4/packages/xowiki/www/diff.adp 5 Oct 2008 01:50:44 -0000 1.3 @@ -1,5 +1,6 @@ @title;noquote@ + property_doc @context;noquote@