--- a/display.rc Mon Aug 02 11:18:18 2010 +0200
+++ b/display.rc Thu Aug 05 16:42:39 2010 +0200
@@ -489,9 +489,6 @@
View defaultStyle isNil ifTrue:[
style := #mswindowsXP.
type := OperatingSystem getSystemType.
- type = 'sunos' ifTrue:[
- style := #mswindowsXP
- ].
type = 'next' ifTrue:[
style := #next
].
@@ -502,10 +499,7 @@
style := #os2
].
type = 'win32' ifTrue:[
- (OperatingSystem getSystemInfo at:#'system') = 'xp' ifTrue:[
- style := #mswindowsXP
- ].
- (OperatingSystem getSystemInfo at:#'system') = 'vista' ifTrue:[
+ (OperatingSystem isVistaLike) ifTrue:[
style := #mswindowsVista
].
].