--- a/SelectionInListView.st	Wed Oct 13 14:48:39 1999 +0200
+++ b/SelectionInListView.st	Thu Oct 14 16:17:37 1999 +0200
@@ -1910,11 +1910,10 @@
         form := self class rightArrowFormOn:device.
         form notNil ifTrue:[
             y := y + ((itemHeight - form height) // 2).
-            (self isInSelection:listLine) ifTrue:[
-                self foreground:hilightFgColor
-            ] ifFalse:[
-                self foreground:fgColor.
-            ].
+            self foreground:(
+                    (self isInSelection:listLine) 
+                        ifTrue:[hilightFgColor] 
+                        ifFalse:[fgColor]).
             self displayForm:form x:x y:y.
         ]
     ] ifFalse:[
@@ -3615,5 +3614,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.150 1999-08-18 14:36:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.151 1999-10-14 14:17:37 cg Exp $'
 ! !