oops
authorClaus Gittinger <cg@exept.de>
Tue, 10 Nov 1998 01:55:54 +0100
changeset 2395 93846300ef6f
parent 2394 cfb6434f1a9c
child 2396 da3125ce46f1
oops
SimpleView.st
--- a/SimpleView.st	Mon Nov 09 21:57:56 1998 +0100
+++ b/SimpleView.st	Tue Nov 10 01:55:54 1998 +0100
@@ -6822,12 +6822,12 @@
         ]
     ] ifFalse:[
         shown ifTrue:[
-            self redrawX:aRectangle left y:aRectangle y
+            self redrawX:aRectangle left y:aRectangle top
                    width:aRectangle width height:aRectangle height
         ].
     ]
 
-    "Modified: / 9.11.1998 / 21:11:00 / cg"
+    "Modified: / 10.11.1998 / 01:55:03 / cg"
 !
 
 invalidateRepairNow:doRepair
@@ -7907,6 +7907,6 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.280 1998-11-09 20:57:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.281 1998-11-10 00:55:54 cg Exp $'
 ! !
 SimpleView initialize!