Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
category change
authorClaus Gittinger <cg@exept.de>
Fri, 19 Jun 1998 02:22:20 +0200
changeset 1588 e2e4ceeed3da
parent 1587 8cacd0f9ed92
child 1589 4fc01fd85b65
category change
ETxtView.st file | annotate | diff | comparison | revisions
EditTextView.st file | annotate | diff | comparison | revisions 
--- a/ETxtView.st	Fri Jun 19 01:58:08 1998 +0200
+++ b/ETxtView.st	Fri Jun 19 02:22:20 1998 +0200
@@ -3443,19 +3443,6 @@
     trimBlankLines := ST80Mode not. "true."
 
     "Modified: / 30.1.1998 / 14:14:59 / cg"
-!
-
-realize
-    "make the view visible - scroll to make the cursor visible."
-
-    super realize.
-
-    self makeCursorVisible.
-    cursorFgColor := cursorFgColor on:device.
-    cursorBgColor := cursorBgColor on:device.
-
-    "Modified: 20.12.1996 / 14:16:05 / cg"
-    "Created: 24.7.1997 / 18:24:12 / cg"
 ! !
 
 !EditTextView methodsFor:'menu actions'!
@@ -3852,6 +3839,21 @@
     "Modified: 28.5.1996 / 19:32:25 / cg"
 ! !
 
+!EditTextView methodsFor:'realization'!
+
+realize
+    "make the view visible - scroll to make the cursor visible."
+
+    super realize.
+
+    self makeCursorVisible.
+    cursorFgColor := cursorFgColor on:device.
+    cursorBgColor := cursorBgColor on:device.
+
+    "Modified: 20.12.1996 / 14:16:05 / cg"
+    "Created: 24.7.1997 / 18:24:12 / cg"
+! !
+
 !EditTextView methodsFor:'redrawing'!
 
 redrawCursorIfBetweenVisibleLine:startVisLine and:endVisLine
@@ -4381,5 +4383,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.171 1998-06-18 23:03:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.172 1998-06-19 00:22:20 cg Exp $'
 ! !
--- a/EditTextView.st	Fri Jun 19 01:58:08 1998 +0200
+++ b/EditTextView.st	Fri Jun 19 02:22:20 1998 +0200
@@ -3443,19 +3443,6 @@
     trimBlankLines := ST80Mode not. "true."
 
     "Modified: / 30.1.1998 / 14:14:59 / cg"
-!
-
-realize
-    "make the view visible - scroll to make the cursor visible."
-
-    super realize.
-
-    self makeCursorVisible.
-    cursorFgColor := cursorFgColor on:device.
-    cursorBgColor := cursorBgColor on:device.
-
-    "Modified: 20.12.1996 / 14:16:05 / cg"
-    "Created: 24.7.1997 / 18:24:12 / cg"
 ! !
 
 !EditTextView methodsFor:'menu actions'!
@@ -3852,6 +3839,21 @@
     "Modified: 28.5.1996 / 19:32:25 / cg"
 ! !
 
+!EditTextView methodsFor:'realization'!
+
+realize
+    "make the view visible - scroll to make the cursor visible."
+
+    super realize.
+
+    self makeCursorVisible.
+    cursorFgColor := cursorFgColor on:device.
+    cursorBgColor := cursorBgColor on:device.
+
+    "Modified: 20.12.1996 / 14:16:05 / cg"
+    "Created: 24.7.1997 / 18:24:12 / cg"
+! !
+
 !EditTextView methodsFor:'redrawing'!
 
 redrawCursorIfBetweenVisibleLine:startVisLine and:endVisLine
@@ -4381,5 +4383,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.171 1998-06-18 23:03:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.172 1998-06-19 00:22:20 cg Exp $'
 ! !
hg/stx-libwidg