EditTextView.st
changeset 915 5147640d0cf7
parent 905 fa8cd14ddce2
child 922 e6a5e1cf9565
--- a/EditTextView.st	Fri Jan 03 22:45:37 1997 +0100
+++ b/EditTextView.st	Fri Jan 03 22:59:43 1997 +0100
@@ -2847,8 +2847,10 @@
     "view was made visible"
 
     super mapped.
-    self makeCursorVisible.
+"/    self makeCursorVisible.
     cursorVisibleLine := self listLineToVisibleLine:cursorLine.
+
+    "Modified: 20.12.1996 / 14:15:56 / cg"
 !
 
 pointerEnter:state x:x y:y
@@ -3037,8 +3039,11 @@
     "make the view visible"
 
     super realize.
+    self makeCursorVisible.
     cursorFgColor := cursorFgColor on:device.
     cursorBgColor := cursorBgColor on:device.
+
+    "Modified: 20.12.1996 / 14:16:05 / cg"
 ! !
 
 !EditTextView methodsFor:'menu actions'!
@@ -3880,5 +3885,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.99 1997-01-02 15:38:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.100 1997-01-03 21:59:43 cg Exp $'
 ! !