--- a/LayoutOrigin.st Thu May 08 00:08:06 2014 +0200
+++ b/LayoutOrigin.st Thu May 08 02:29:33 2014 +0200
@@ -261,7 +261,7 @@
!LayoutOrigin methodsFor:'comparing'!
= anObject
- ^ anObject class == self
+ ^ anObject class == self class
and:[ anObject leftFraction = leftFraction
and:[ anObject topFraction = topFraction
and:[ anObject leftOffset = leftOffset
@@ -413,6 +413,10 @@
!LayoutOrigin class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.26 2014-05-07 22:08:06 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.27 2014-05-08 00:29:33 cg Exp $'
+!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libview2/LayoutOrigin.st,v 1.27 2014-05-08 00:29:33 cg Exp $'
! !