MenuItem.st
changeset 2033 a9ed3856e834
parent 2018 5a6446cf5079
child 2036 f8e99bb346e4
equal deleted inserted replaced
2032:cf3b4dcc4ad3 2033:a9ed3856e834
   669     menu := self receiver:aReceiver perform:submenuChannel with:argument
   669     menu := self receiver:aReceiver perform:submenuChannel with:argument
   670         ifNone:[ self receiver:(aReceiver class) perform:submenuChannel with:argument ifNone:nil ].
   670         ifNone:[ self receiver:(aReceiver class) perform:submenuChannel with:argument ifNone:nil ].
   671 
   671 
   672     menu isNil ifTrue:[^ nil].
   672     menu isNil ifTrue:[^ nil].
   673     menu := menu value.
   673     menu := menu value.
       
   674     menu isNil ifTrue:[^ nil].
   674 
   675 
   675     menu isArray ifTrue:[
   676     menu isArray ifTrue:[
   676         menu := Menu new fromLiteralArrayEncoding:menu.
   677         menu := Menu new fromLiteralArrayEncoding:menu.
   677     ].
   678     ].
   678 
   679 
   865 ! !
   866 ! !
   866 
   867 
   867 !MenuItem class methodsFor:'documentation'!
   868 !MenuItem class methodsFor:'documentation'!
   868 
   869 
   869 version
   870 version
   870     ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.67 2004-09-30 19:16:19 cg Exp $'
   871     ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.68 2005-02-01 15:34:08 james Exp $'
   871 ! !
   872 ! !