class: EditTextView
comment/format in:
#doKeyPress:x:y:
#initializeCodeCompletionService
#replaceFromCharacterPosition:to:with:
--- 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 $'
! !