TextView.st
changeset 45 e900c30938c8
parent 38 4b9b70b2cc87
child 53 b587b15eafab
--- a/TextView.st	Fri Aug 12 01:47:09 1994 +0200
+++ b/TextView.st	Fri Aug 12 01:48:09 1994 +0200
@@ -32,7 +32,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
              All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.7 1994-08-07 13:23:28 claus Exp $
+$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.8 1994-08-11 23:48:09 claus Exp $
 '!
 
 !TextView class methodsFor:'documentation'!
@@ -53,7 +53,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.7 1994-08-07 13:23:28 claus Exp $
+$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.8 1994-08-11 23:48:09 claus Exp $
 "
 !
 
@@ -196,12 +196,6 @@
     self enableButtonMotionEvents
 !
 
-realize
-    super realize.
-    selectionFgColor := selectionFgColor on:device.
-    selectionBgColor := selectionBgColor on:device.
-!
-
 initializeMiddleButtonMenu
     |labels|
 
@@ -1203,6 +1197,12 @@
 
 !TextView methodsFor:'event processing'!
 
+mapped 
+    super mapped.
+    selectionFgColor := selectionFgColor on:device.
+    selectionBgColor := selectionBgColor on:device.
+!
+
 keyPress:key x:x y:y
     "handle some keyboard input (there is not much to be done here)"