Index: openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl,v
diff -u -r1.7.2.1 -r1.7.2.2
--- openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl	10 Sep 2015 08:10:44 -0000	1.7.2.1
+++ openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl	28 Nov 2016 17:29:07 -0000	1.7.2.2
@@ -14,8 +14,25 @@
                             {fs_package_id folder_id selector_type file_types}]
 set fs_found 1
 
-ad_return_template
 
+## Add event handlers
+
+template::add_event_listener -id "body" -event "load" -script {
+  Init();
+}
+template::add_event_listener -id "file_selector_button" -script {
+  openFileSelector();
+}
+template::add_event_listener -id "ok_button" -script {
+  onOK();
+}
+template::add_event_listener -id "cancel_button" -script {
+  onCancel();
+}
+
+##
+
+
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 2