Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -N -r1.214 -r1.215
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	6 Apr 2018 16:06:32 -0000	1.214
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	9 Apr 2018 07:47:05 -0000	1.215
@@ -2239,7 +2239,7 @@
 
   toc instproc initialize {} {
     :get_parameters
-    :array set navigation {count 0 position 0 current ""}
+    array set :navigation {count 0 position 0 current ""}
 
     set list_mode 0
     switch -- $style {
Index: openacs-4/packages/xowiki/tcl/syndicate-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/syndicate-procs.tcl,v
diff -u -N -r1.49 -r1.50
--- openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	1 Feb 2018 21:56:57 -0000	1.49
+++ openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	9 Apr 2018 07:47:05 -0000	1.50
@@ -401,7 +401,7 @@
 
     switch [RSS-client getRSSVersion $doc] {
       0.91 - 0.92 - 0.93 - 2.0 {
-        :array set xpath {
+        array set :xpath {
           title        {/rss/channel/title/text()}
           link        {/rss/channel/link/text()}
           imgNode    {/rss/channel/image/title}
@@ -417,7 +417,7 @@
         }
       }
       1.0 {
-        :array set xpath {
+        array set :xpath {
           title        {/rdf:RDF/*[local-name()='channel']/*[local-name()='title']/text()}
           link        {/rdf:RDF/*[local-name()='channel']/*[local-name()='link']/text()}
           imgNode    {/rdf:RDF/*[local-name()='image']}
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 -N -r1.509 -r1.510
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	6 Apr 2018 16:06:32 -0000	1.509
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	9 Apr 2018 07:47:05 -0000	1.510
@@ -2646,7 +2646,7 @@
     #
     # prepare language links
     #
-    :array set lang_links {found "" undefined ""}
+    array set :lang_links {found "" undefined ""}
     #
     # prepare references management
     #
Index: openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl	7 Aug 2017 23:48:31 -0000	1.5
+++ openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl	9 Apr 2018 07:47:05 -0000	1.6
@@ -29,7 +29,7 @@
 TableWidget t1 -volatile \
     -set show_heritage $admin_p \
     -columns {
-      if {[[my info parent] set show_heritage]} {
+      if {[[:info parent] set show_heritage]} {
         Field inherited -label ""
       }
       AnchorField name -label [_ xowiki.Page-name] -CSSclass "ok-handler"