Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.185 -r1.186
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	16 Nov 2007 18:25:34 -0000	1.185
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	19 Nov 2007 12:40:16 -0000	1.186
@@ -415,6 +415,13 @@
     next
   }
 
+  Page instproc get_instance_attributes {} {
+    if {[my exists instance_attributes]} {
+      return [my set instance_attributes]
+    }
+    return ""
+  }
+
   Page instproc regsub_eval {{-noquote:boolean false} re string cmd} {
     if {$noquote} {
       set map { \[ \\[ \] \\] \$ \\$ \\ \\\\}