--- a/Object.st	Wed May 06 06:59:44 2015 +0200
+++ b/Object.st	Sun May 10 07:10:08 2015 +0100
@@ -256,6 +256,7 @@
     "Modified: / 4.8.1999 / 08:54:06 / stefan"
 ! !
 
+
 !Object class methodsFor:'Compatibility-ST80'!
 
 rootError
@@ -1753,6 +1754,7 @@
 ! !
 
 
+
 !Object methodsFor:'attributes access'!
 
 objectAttributeAt:attributeKey
@@ -2056,6 +2058,7 @@
     ^ aBlock ensure:[ self addDependent:someone ]
 ! !
 
+
 !Object methodsFor:'comparing'!
 
 = anObject
@@ -7943,6 +7946,7 @@
     ^ self
 ! !
 
+
 !Object methodsFor:'secure message sending'!
 
 ?:selector
@@ -8548,6 +8552,7 @@
     "
 ! !
 
+
 !Object methodsFor:'synchronized evaluation'!
 
 freeSynchronizationSemaphore
@@ -9518,6 +9523,13 @@
     ^ (self class) == aClass
 !
 
+isMenuItem
+    "return true, if the receiver is a menu item inside a MenuPanel, Menu or PopUpmenu.
+     false is returned here - the method is redefined in some classes."
+
+    ^ false
+!
+
 isMeta
     "return true, if the receiver is some kind of metaclass;
      false is returned here - the method is only redefined in Metaclass."
@@ -10273,14 +10285,16 @@
 ! !
 
 
+
+
 !Object class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.802 2015-04-26 11:30:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.803 2015-05-06 09:27:33 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.802 2015-04-26 11:30:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.803 2015-05-06 09:27:33 cg Exp $'
 !
 
 version_HG