--- a/TextView.st Fri May 30 23:20:49 2014 +0200
+++ b/TextView.st Sat May 31 04:36:23 2014 +0200
@@ -4597,6 +4597,11 @@
selectFromLine:startLine col:startCol toLine:endLine col:endCol
"select a piece of text and redraw that area"
+ ((selectionStartLine = startLine)
+ and:[ (selectionStartCol = startCol)
+ and:[ (selectionEndLine = endLine)
+ and:[ (selectionEndCol = endCol) ]]]) ifTrue:[^ self ].
+
self unselect.
startLine notNil ifTrue:[
"new:"
@@ -4879,11 +4884,11 @@
!TextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.373 2014-04-30 13:57:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.374 2014-05-31 02:36:23 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.373 2014-04-30 13:57:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.374 2014-05-31 02:36:23 cg Exp $'
! !