clear and invalidate in reinitStyle.
--- a/SimpleView.st Fri Sep 18 22:10:29 1998 +0200
+++ b/SimpleView.st Fri Sep 18 22:19:26 1998 +0200
@@ -5032,10 +5032,10 @@
"force a change"
t := borderWidth. borderWidth := nil. self borderWidth:t.
t := viewBackground. viewBackground := nil. self viewBackground:t.
-"/ self invalidate.
- ].
-
- "Modified: / 15.9.1998 / 22:08:52 / cg"
+ self clear. self invalidate.
+ ].
+
+ "Modified: / 18.9.1998 / 21:15:33 / cg"
!
reinitialize
@@ -7885,6 +7885,6 @@
!SimpleView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.274 1998-09-18 15:53:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.275 1998-09-18 20:19:26 cg Exp $'
! !
SimpleView initialize!