--- a/MenuView.st Mon Jun 17 14:52:56 2013 +0200
+++ b/MenuView.st Mon Jun 17 16:23:34 2013 +0200
@@ -1165,6 +1165,12 @@
"Modified: 27.4.1996 / 15:25:16 / cg"
!
+isEmpty
+ "return true, if I have no items"
+
+ ^ list isEmptyOrNil
+!
+
labelAt:indexOrName put:aString
"change the label at index to be aString"
@@ -2990,10 +2996,10 @@
!MenuView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.175 2013-04-26 12:59:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.176 2013-06-17 14:23:34 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.175 2013-04-26 12:59:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.176 2013-06-17 14:23:34 cg Exp $'
! !