branch | delegated_gc_text-view-selection-refactoring |
changeset 5221 | d036f1df0408 |
parent 5129 | 9549b0a1dbf5 |
parent 5220 | 5251ecf0c9bb |
child 5296 | 588057883532 |
--- a/TextView.st Mon Nov 24 13:48:48 2014 +0000 +++ b/TextView.st Wed Dec 10 23:48:16 2014 +0000 @@ -4694,11 +4694,11 @@ self redrawLine:selectionStartLine from:(selectionStartCol min: oldStartCol) to:(selectionEndCol max: oldEndCol) - ] ifFalse:[ + ] ifFalse:[ (selectionStartLine min: oldStartLine) to: (selectionEndLine max: oldEndLine) do:[:lineNr | - self redrawLine:lineNr - ] - ]. + self redrawLine:lineNr + ] + ]. selectStyle := nil. ]