--- a/AbstractSettingsApplication.st	Fri Oct 15 19:32:56 2004 +0200
+++ b/AbstractSettingsApplication.st	Fri Oct 15 19:58:42 2004 +0200
@@ -9923,7 +9923,7 @@
     ].
     listOfStyles remove:'generic' ifAbsent:nil; remove:'mswindows3' ifAbsent:nil.
     self showStandardStylesOnly value ifTrue:[
-        listOfStyles := listOfStyles select:[:aStyleName | self class standardStyles includes:aStyleName].
+        listOfStyles := listOfStyles select:[:aStyleName | self class standardStyles includes:aStyleName asLowercase].
     ].
 
     listOfStyles sort.
@@ -9964,7 +9964,7 @@
     ].
 
     self updateList.
-    (self class standardStyles includes:View defaultStyle) ifFalse:[
+    (self class standardStyles includes:View defaultStyle asLowercase) ifFalse:[
         self showStandardStylesOnly value:false
     ].
     self selectedStyle value:(View defaultStyle).
@@ -11274,5 +11274,5 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.182 2004-10-15 16:04:15 cg Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.183 2004-10-15 17:58:42 cg Exp $'
+! !