Index: openacs-4/packages/xowiki/tcl/yui-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/yui-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/xowiki/tcl/yui-procs.tcl 27 Apr 2015 15:28:23 -0000 1.3
+++ openacs-4/packages/xowiki/tcl/yui-procs.tcl 15 Jun 2015 19:21:07 -0000 1.4
@@ -91,7 +91,7 @@
html::t \n
html::div -class "bd" {
foreach group [my split_menu_groups [my children]] {
- html::ul {
+ html::ul -class yuiml {
foreach menuitemlist $group {$menuitemlist render}
}
}
@@ -217,7 +217,7 @@
my append CSSclass " yuimenu"
html::div [my get_attributes id {CSSclass class}] {
html::div -class "bd" {
- html::ul {
+ html::ul -class yuicm {
foreach li [my children] {$li render}
}
}
@@ -482,7 +482,7 @@
if {[$field hide]} continue
if {[$field istype HiddenField]} continue
if {[$field istype BulkAction]} {
- set label ""
+ set label ""
set sortable false
} else {
set label [$field label]