LayoutFrame.st
changeset 3329 d885d47a0693
parent 3018 e7f336370c9f
child 3337 d0becaeb96b9
--- a/LayoutFrame.st	Thu May 08 00:07:49 2014 +0200
+++ b/LayoutFrame.st	Thu May 08 00:07:58 2014 +0200
@@ -401,6 +401,21 @@
     "Created: 26.5.1996 / 17:39:50 / cg"
 ! !
 
+!LayoutFrame methodsFor:'comparing'!
+
+= anObject
+    ^ super = anObject
+        and:[ anObject rightFraction = rightFraction
+        and:[ anObject bottomFraction = bottomFraction
+        and:[ anObject rightOffset = rightOffset
+        and:[ anObject bottomOffset = bottomOffset ]]]]
+!
+
+hash
+    ^ super hash
+      + rightFraction hash + bottomFraction hash + rightOffset hash + bottomOffset hash
+! !
+
 !LayoutFrame methodsFor:'converting'!
 
 fromLiteralArrayEncoding:encoding
@@ -560,9 +575,10 @@
 !LayoutFrame class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.38 2012-08-03 15:53:57 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.39 2014-05-07 22:07:58 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.38 2012-08-03 15:53:57 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/LayoutFrame.st,v 1.39 2014-05-07 22:07:58 cg Exp $'
 ! !
+