--- a/SelectionInListView.st	Tue Jun 25 22:53:43 2013 +0200
+++ b/SelectionInListView.st	Tue Jun 25 23:22:39 2013 +0200
@@ -1209,15 +1209,15 @@
 attributeAt:index
     "return the line attribute of list line index.
      currently supported are:
-	 #halfIntensity
-	 #disabled
-	 #bold
+         #halfIntensity
+         #disabled
+         #bold
     "
 
-    listAttributes isNil ifFalse:[
-	(index > listAttributes size) ifFalse:[
-	    ^ listAttributes at:index
-	]
+    listAttributes notNil ifTrue:[
+        (index > listAttributes size) ifFalse:[
+            ^ listAttributes at:index
+        ]
     ].
     ^ nil
 !
@@ -4107,10 +4107,10 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.267 2013-06-05 13:21:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.268 2013-06-25 21:22:39 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.267 2013-06-05 13:21:58 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.268 2013-06-25 21:22:39 cg Exp $'
 ! !