Index: openacs-4/packages/xowiki/tcl/link-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/link-procs.tcl,v
diff -u -r1.96.2.6 -r1.96.2.7
--- openacs-4/packages/xowiki/tcl/link-procs.tcl 14 Oct 2016 18:40:50 -0000 1.96.2.6
+++ openacs-4/packages/xowiki/tcl/link-procs.tcl 5 Nov 2016 17:52:17 -0000 1.96.2.7
@@ -310,7 +310,8 @@
\$('.modal-backdrop').not('.stacked').addClass('stacked');
});
-}
+ }
+
#
# Large bootstrap modal using ajax
#
@@ -554,7 +555,7 @@
$addParams so.write('$id');
"
- }
+ }
#
# glossary links
@@ -566,7 +567,7 @@
set id [my lookup_xowiki_package_by_name [my type] \
[site_node::get_node_id_from_object_id -object_id [my package_id]]]
#my log "--LINK glossary lookup returned package_id $id"
- if {$id} {
+ if {$id > 0} {
# set correct package id for rendering the link
my set package_id $id
#my log "-- INITIALIZE $id"
@@ -582,8 +583,11 @@
::xo::Page requireJS "/resources/xowiki/get-http-object.js"
::xo::Page requireJS "/resources/xowiki/popup-handler.js"
::xo::Page requireJS "/resources/xowiki/overlib/overlib.js"
- return "$label"
+ if {![my exists cssid]} {my cssid [::xowiki::Includelet html_id [self]]}
+ template::add_event_listener \
+ -id [my cssid] \
+ -script [subst {showInfo('[ns_quotehtml $href?master=0]','[ns_quotehtml $label]')}]
+ return "$label"
}
#