Index: openacs-4/packages/xowiki/tcl/folder-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/folder-procs.tcl,v
diff -u -r1.46 -r1.47
--- openacs-4/packages/xowiki/tcl/folder-procs.tcl	6 Apr 2018 16:06:32 -0000	1.46
+++ openacs-4/packages/xowiki/tcl/folder-procs.tcl	10 Apr 2018 06:52:09 -0000	1.47
@@ -720,7 +720,7 @@
     {cols 80}
   }
   menuentries instproc pretty_value {v} {
-    [:object] do_substitutions 0
+    ${:object} do_substitutions 0
     return "<pre class='code'>[string map [list & {&amp;} < {&lt;} > {&gt;}]  [:value]]</pre>"
   }
 }
Index: openacs-4/packages/xowiki/tcl/repeat-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/repeat-procs.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/xowiki/tcl/repeat-procs.tcl	9 Apr 2018 08:11:05 -0000	1.13
+++ openacs-4/packages/xowiki/tcl/repeat-procs.tcl	10 Apr 2018 06:52:09 -0000	1.14
@@ -181,7 +181,7 @@
     #
     # remove "unneeded" entries from instance attributes
     #
-    [:object] instvar instance_attributes
+    ${:object} instvar instance_attributes
     foreach {name value} $values {
       if {[dict exists $instance_attributes $name]} {
         dict unset instance_attributes $name
Index: openacs-4/packages/xowiki/tcl/tree-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/tree-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/xowiki/tcl/tree-procs.tcl	15 Mar 2018 09:19:00 -0000	1.19
+++ openacs-4/packages/xowiki/tcl/tree-procs.tcl	10 Apr 2018 06:52:09 -0000	1.20
@@ -361,7 +361,7 @@
   TreeRenderer=listdnd instproc render_node {{-open:boolean false} cat_content} {
     #set open_state [expr {${:open_requests} > 0 ?"class='liOpen'" : "class='liClosed'"}]
     #set cl [lindex [:info precedence] 0]
-    set obj [:object]
+    set obj ${:object}
     set o [:owner]
     $obj instvar page_order
     set :li_id [::xowiki::Includelet js_name [$o set id]_$page_order]
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.513 -r1.514
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	9 Apr 2018 08:14:23 -0000	1.513
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	10 Apr 2018 06:52:09 -0000	1.514
@@ -2696,7 +2696,7 @@
   # and keywords".  Below is an example of a workflow specific search
   # content.
   #
-  #   [:object] proc search_render {} {
+  #   ${:object} proc search_render {} {
   #        return [list html "Hello World" keywords "hello world"]
   #   }
   #