xowiki::MenuItem instproc init (private)

 <instance of xowiki::MenuItem[i]> init args [ args... ]

Defined in /var/www/openacs.org/packages/xowiki/tcl/menu-procs.tcl

doku

Parameters:
args (required)

Testcases:
create_folder_with_page, create_workflow_with_instance
Source code:
next
# Use computed default values when not specified
if {![info exists :title]} {
  # set the mouseover-title to the "MenuItem-Label"
  # TODO: Do we really want "text" to be required ?
  set :title ${:text}
}
if {![info exists :CSSclass]} {
  # set the CSS class to e.g. "yuimenuitem"
  set :CSSclass [string tolower [namespace tail [:info class]]]
}

if {![info exists :href] || ${:href} eq ""} {
  append :CSSclass " " [string tolower [namespace tail [:info class]]]-disabled
}
if {![info exists :linkclass]} {
  # set the CSS class to e.g. "yuimenuitemlabel"
  set :linkclass [string tolower [namespace tail [:info class]]]label
}
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: