MenuItem.st
changeset 2122 4a0a8af7bd71
parent 2112 3c4dd2e9203f
child 2125 78bd48d8de76
--- a/MenuItem.st	Mon Mar 06 09:52:32 2006 +0100
+++ b/MenuItem.st	Mon Mar 06 09:56:36 2006 +0100
@@ -869,10 +869,16 @@
 
     indication := self indication.
   ^ indication value == true
+!
+
+isSeparatorItem
+    ^ #('' '-' '=') includes:label
+
+    "Created: 25.2.1997 / 19:39:17 / cg"
 ! !
 
 !MenuItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.75 2006-02-23 21:03:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/MenuItem.st,v 1.76 2006-03-06 08:56:36 cg Exp $'
 ! !