fixed non-region case
authorClaus Gittinger <cg@exept.de>
Sun, 06 Jun 1999 00:09:07 +0200
changeset 1184 6bdcc3a40103
parent 1183 8dff9008b5c7
child 1185 522d9c84f0a9
fixed non-region case
VisualRegion.st
--- a/VisualRegion.st	Sat Jun 05 21:43:56 1999 +0200
+++ b/VisualRegion.st	Sun Jun 06 00:09:07 1999 +0200
@@ -167,6 +167,7 @@
     ] ifFalse:[
         self borderShape:nil.
         self viewShape:nil.
+        self borderWidth:lineWidth.
     ].
     ^ self.
 
@@ -216,5 +217,5 @@
 !VisualRegion class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/VisualRegion.st,v 1.3 1999-06-05 19:43:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/VisualRegion.st,v 1.4 1999-06-05 22:09:07 cg Exp $'
 ! !