--- a/styles/os2.style	Wed Oct 27 14:10:19 1999 +0200
+++ b/styles/os2.style	Wed Oct 27 15:28:03 1999 +0200
@@ -2,7 +2,7 @@
 ;
 ; this is not yet completed
 ;
-; $Header: /cvs/stx/stx/libview/styles/os2.style,v 1.17 1999-04-28 20:40:54 cg Exp $
+; $Header: /cvs/stx/stx/libview/styles/os2.style,v 1.18 1999-10-27 13:28:03 stefan Exp $
 
 comment  'OS/2 look alike'
 
@@ -20,14 +20,14 @@
 ; darkerGrey                Color grey:67
 
 
-#if Display hasColors 
+#if Screen current hasColors 
 Yellow                    (Color red:100 green:100 blue:70) exactOrNearestOn:(Screen current)
 Yellow                    (Color red:100 green:100 blue:70)
 #else
 Yellow                    Color white
 #endif
 
-#if Display hasGreyscales  
+#if Screen current hasGreyscales  
 viewGrey                  (Color grey:67) exactOrNearestOn:(Screen current) 
 brighterGrey              (Color grey:80) exactOrNearestOn:(Screen current) 
 darkerGrey                (Color grey:50) exactOrNearestOn:(Screen current) 
@@ -38,9 +38,9 @@
 darkerGrey                Color white 
 #endif
 
-#if Display platformName = 'WIN32'
-viewGrey           [Display getSystemColor:#'COLOR_BTNFACE']
-brighterGrey       [Display getSystemColor:#'COLOR_BTNFACE']
+#if Screen current platformName = 'WIN32'
+viewGrey           [Screen current getSystemColor:#'COLOR_BTNFACE']
+brighterGrey       [Screen current getSystemColor:#'COLOR_BTNFACE']
 darkerGrey         Color grey:50
 #endif
 
@@ -71,7 +71,7 @@
 button.passiveLevel              3
 button.returnButtonHasBorder     true
 ; button.activeBackgroundColor     =darkerGrey
-#if Display hasGreyscales 
+#if Screen current hasGreyscales 
 button.activeBackgroundColor     =brighterGrey
 #else
 button.activeBackgroundColor     Color black
@@ -98,7 +98,7 @@
 arrowButton.activeLevel            -1 "/ 0
 arrowButton.passiveLevel           1
 
-#if Display hasGreyscales 
+#if Screen current hasGreyscales 
 button.disabledForegroundColor     Color white
 arrowButton.activeForegroundColor  Color white
 #else
@@ -107,7 +107,7 @@
 #endif
 
 checkToggle.checkColor             Color black
-#if Display hasGreyscales not
+#if Screen current hasGreyscales not
 checkToggle.activeBackgroundColor  Color white
 #else
 checkToggle.activeBackgroundColor =viewGrey
@@ -118,7 +118,7 @@
 
 selection.backgroundColor          =Yellow
 selection.hilightForegroundColor   Color white
-#if Display hasGreyscales
+#if Screen current hasGreyscales
 selection.hilightBackgroundColor   (Color grey:50) exactOrNearestOn:(Screen current)
 selection.hilightFrameColor        (Color grey:25) exactOrNearestOn:(Screen current)
 #else
@@ -143,7 +143,7 @@
 menu.lightColor                      =menu.backgroundColor lightened
 ; menu.hilightForegroundColor        Color white
 ; menu.hilightBackgroundColor        =darkerGrey
-#if Display hasGreyscales
+#if Screen current hasGreyscales
 menu.hilightFrameColor               nil
 menu.hilightLevel                    -1
 #else
@@ -157,13 +157,13 @@
 pullDownMenu.separatingLines         false
 pullDownMenu.level                   0
 pullDownMenu.hilightLevel            -1
-#if Display hasGrayscales
+#if Screen current hasGrayscales
 pullDownMenu.hilightForegroundColor  Color black
 #else
 pullDownMenu.hilightForegroundColor  Color white
 #endif
 
-#if Display hasGrayscales not
+#if Screen current hasGrayscales not
 html.anchorUnderline                true
 html.anchorForegroundColor          Color black
 html.backgroundColor                Color white