--- a/styles/iris_GB.style	Mon Aug 19 18:25:50 2002 +0200
+++ b/styles/iris_GB.style	Mon Aug 19 18:26:47 2002 +0200
@@ -5,7 +5,7 @@
 ; to make the ST/X views fit nicely into an existing
 ; application.
 ;
-; $Header: /cvs/stx/stx/libview/styles/iris_GB.style,v 1.6 1999-10-27 13:28:02 stefan Exp $
+; $Header: /cvs/stx/stx/libview/styles/iris_GB.style,v 1.7 2002-08-19 16:26:47 cg Exp $
 
 comment  'Silicon graphics'' Iris look alike; brownish colors'
 
@@ -64,11 +64,11 @@
 #endif
 
 #if Screen current hasColors   
-; editField.backgroundColor           Color wheat
-editField.backgroundColor           Color wheat
+; editField.backgroundColor           Color name:'wheat'
+editField.backgroundColor           Color name:'wheat'
 editField.selectionBackgroundColor  Color white
 pullDownMenu.hilightForegroundColor Color black.
-pullDownMenu.hilightBackgroundColor Color wheat.
+pullDownMenu.hilightBackgroundColor Color name:'wheat'.
 editField.selectionForegroundColor  Color black
 #endif
 
@@ -88,8 +88,11 @@
 checkToggle.checkColor           Color red
 checkToggle.bitmapFile           'CheckOnColor.xpm'
 checkToggle.labelOverMargin      true
+
 radioButton.showLamp             false
 radioButton.style                #iris
+radioButton.backgroundColor        =viewGrey
+radioButton.activeBackgroundColor  =viewGrey
 #endif
 
 scroller.level                   -1
@@ -116,7 +119,7 @@
 button.disabledForegroundColor   Color grey
 #if Screen current hasGreyscales
 button.enteredBackgroundColor    =gbBrownActive
-button.activeBackgroundColor     Color wheat
+button.activeBackgroundColor     Color name:'wheat'
 button.activeForegroundColor     Color black
 #else
 button.enteredBackgroundColor    Color white
@@ -138,7 +141,7 @@
 #endif
 
 pullDownMenu.font                =menuFont
-pullDownMenu.level               0
+pullDownMenu.level               1
 pullDownMenu.hilightLevel        2
 pullDownMenu.edgeStyle           #soft