--- a/MenuView.st	Fri Oct 05 13:58:19 2001 +0200
+++ b/MenuView.st	Mon Oct 08 14:46:22 2001 +0200
@@ -409,17 +409,18 @@
 
     index := self indexOf:indexOrName.
     index ~~ 0 ifTrue:[
-	enableFlags isNil ifTrue:[^ true].
-	^ enableFlags at:index
+        enableFlags isNil ifTrue:[^ true].
+        ^ enableFlags at:index
     ].
     "ask submenus for convenience"
     (indexOrName isNumber not and:[subMenus notNil]) ifTrue:[
-	subMenus do:[:m |
-	    m notNil ifTrue:[
-		m enable:indexOrName
-	    ]
-	]
-    ]
+        subMenus do:[:m |
+            m notNil ifTrue:[
+                (m isEnabled:indexOrName) ifTrue:[^ true].
+            ]
+        ]
+    ].
+    ^ false
 !
 
 setEnable:indexOrName to:aBoolean
@@ -2734,5 +2735,5 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.130 2001-10-05 08:56:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.131 2001-10-08 12:46:22 cg Exp $'
 ! !