xowiki::YUIMenuItem instproc render (public)
<instance of xowiki::YUIMenuItem> render
Defined in /var/www/openacs.org/packages/xowiki/tcl/yui-procs.tcl
doku
- Testcases:
- No testcase defined.
Source code: html::li [:get_attributes id {CSSclass class} style] { # if we have no href, mark entry as disabled if {![info exists :href] || [:href] eq ""} {append :linkclass " disabled"} if {[info exists :listener] && ${:listener} ne ""} { #ns_log notice "menuitem has id [:id] listener [:listener] parent ${:__parent} [${:__parent} info class]" lassign [:listener] type body ${:__parent} append extrajs [subst { document.getElementById('[:id]').addEventListener('$type', function (event) { $body; }, false); }] } html::a [:get_attributes target href {linkclass class} title] { html::t [:text] if {[info exists :helptext]} { html::em { html::t [:helptext] } } } foreach menu [:children] {$menu render} } html::t \nXQL Not present: Generic, PostgreSQL, Oracle