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 -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl	5 Nov 2016 18:04:59 -0000	1.4.2.2
+++ openacs-4/packages/xowiki/www/xinha/insert-wlink.tcl	28 Nov 2016 17:57:08 -0000	1.4.2.3
@@ -37,6 +37,7 @@
     }
 
 template::add_event_listener -CSSclass "ok-handler" -script {onOK(this);}
+template::add_event_listener -id "body" -event "load" -script {Init();}
 
 foreach entry [$listing children] {
   $entry instvar name parent_id title formatted_date page_id