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 -r1.122 -r1.123
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	18 Dec 2007 09:00:11 -0000	1.122
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	18 Dec 2007 09:38:09 -0000	1.123
@@ -217,9 +217,10 @@
         set header_stuff [::xo::Page header_stuff]
         #
         # pass variables for properties doc and body
-        # example: set property_body(class) "yui-skin-sam"
+        # example: ::xo::Page set_property body class "yui-skin-sam"
         #
-        my instvar property_body property_doc
+        array set property_body [::xo::Page get_property body]
+        array set property_doc  [::xo::Page get_property doc]
 
         $package_id return_page -adp $template_file -variables {
           name title item_id context header_stuff return_url