SelectionInListView.st
branchjv
changeset 5709 219a28ca67d1
parent 5678 9cbcdd21ea39
parent 5707 b4784c2083e0
child 5737 98bc0782ffa1
--- a/SelectionInListView.st	Fri May 06 06:55:15 2016 +0200
+++ b/SelectionInListView.st	Sat May 07 06:52:44 2016 +0200
@@ -2817,7 +2817,7 @@
     lineNr notNil ifTrue:[
         len := self widthOfLine:lineNr.
         len > width ifTrue:[
-            ^ (self listAt:lineNr)  
+            ^ (self listAt:lineNr) collect:[:ch | ch isSeparator ifTrue:[$ ] ifFalse:[ch]]  
         ].      
     ].
     ^ nil