Index: openacs-4/packages/xowiki/tcl/menu-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/menu-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/xowiki/tcl/menu-procs.tcl	11 Mar 2011 12:14:40 -0000	1.2
+++ openacs-4/packages/xowiki/tcl/menu-procs.tcl	11 Oct 2011 11:50:20 -0000	1.3
@@ -74,7 +74,7 @@
     }
 
     if {![my exists href] || [my href] eq ""} {
-      my append CSSclass [string tolower [namespace tail [my info class]]]-disabled
+      my append CSSclass " " [string tolower [namespace tail [my info class]]]-disabled
     }
     if {![my exists linkclass]} {
       # set the CSS class to e.g. "yuimenuitemlabel"
@@ -295,7 +295,9 @@
     my append CSSclass " yuimenu"
     html::div [my get_attributes id {CSSclass class}] {
       html::div -class "bd" {
-        foreach li [my children] {$li render}
+	html::ul {
+	  foreach li [my children] {$li render}
+	}
       }
       html::script -type "text/javascript" {
         html::t "var [my js_name] = new YAHOO.widget.ContextMenu('[my id]', { trigger: '[my set trigger]' } );"