--- a/PopUpMenu.st	Mon Jun 17 16:26:33 2013 +0200
+++ b/PopUpMenu.st	Mon Jun 17 16:26:45 2013 +0200
@@ -1087,18 +1087,18 @@
     "Created: / 30-06-2011 / 10:28:57 / cg"
 !
 
+hasItems
+    "return true, if I have items"
+
+    ^ menuView notNil and:[ menuView hasItems ]
+!
+
 indexOf:indexOrName
     "return the index of a submenu - or 0 if there is none"
 
     ^ menuView indexOf:indexOrName
 !
 
-isEmpty
-    "return true, if I have no items"
-
-    ^ menuView isNil or:[ menuView isEmpty ]
-!
-
 labels
     "return the list of labels"
 
@@ -1670,7 +1670,11 @@
 
 !PopUpMenu class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.112 2013-06-17 14:26:45 cg Exp $'
+!
+
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.111 2013-06-17 14:24:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PopUpMenu.st,v 1.112 2013-06-17 14:26:45 cg Exp $'
 ! !