redraw if orientation changes
authorClaus Gittinger <cg@exept.de>
Fri, 28 Feb 1997 21:25:03 +0100
changeset 316 f6214d6f484d
parent 315 eab866497e0e
child 317 0f8f00dc025a
redraw if orientation changes
Separator.st
--- a/Separator.st	Fri Feb 28 21:23:44 1997 +0100
+++ b/Separator.st	Fri Feb 28 21:25:03 1997 +0100
@@ -154,7 +154,12 @@
 orientation:aSymbol
     "set the orientation to one of #horizontal or #vertical"
 
-    orientation := aSymbol
+    orientation := aSymbol.
+    shown ifTrue:[
+        self invalidate
+    ]
+
+    "Modified: 28.2.1997 / 21:24:38 / cg"
 ! !
 
 !Separator methodsFor:'drawing'!
@@ -204,6 +209,6 @@
 
 !Separator class methodsFor:'documentation'!
 
-version 
-    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.13 1997-02-28 20:23:44 cg Exp $'
+version
+    ^ '$Header: /cvs/stx/stx/libwidg2/Separator.st,v 1.14 1997-02-28 20:25:03 cg Exp $'
 ! !