class: EditTextView
authorClaus Gittinger <cg@exept.de>
Fri, 30 Aug 2013 23:45:09 +0200
changeset 4701 fc3e667bcc01
parent 4700 150468a2ea5a
child 4702 02d7770b3206
class: EditTextView comment/format in: #doKeyPress:x:y: #initializeCodeCompletionService #replaceFromCharacterPosition:to:with:
EditTextView.st
--- a/EditTextView.st	Fri Aug 30 21:47:56 2013 +0200
+++ b/EditTextView.st	Fri Aug 30 23:45:09 2013 +0200
@@ -3418,6 +3418,7 @@
 replaceFromCharacterPosition:charPos1 to:charPos2 with:newString
     "replace a substring at a character position"
 
+    "/ sigh - insert first, to avoid troible due to shifing-in virtual line ends
     self insertString:newString atCharacterPosition:charPos1.
     self deleteFromCharacterPosition:charPos1+newString size to:charPos2+newString size.
 !
@@ -4728,6 +4729,7 @@
 
     |fKeyMacros shiftPressed ctrlPressed i event macroName|
 
+    "/ experimental
     UserPreferences current immediateCodeCompletion ifTrue:[
         completionService isNil ifTrue:[
             self initializeCodeCompletionService.            
@@ -8181,10 +8183,10 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.567 2013-08-30 19:47:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.568 2013-08-30 21:45:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.567 2013-08-30 19:47:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.568 2013-08-30 21:45:09 cg Exp $'
 ! !