--- a/styles/iris.style Thu Aug 07 18:49:20 1997 +0200
+++ b/styles/iris.style Mon Aug 11 13:55:36 1997 +0200
@@ -3,7 +3,7 @@
; silicon graphics style
; (somwehat like motif, but with smooth edges and bells&whistles)
;
-; $Header: /cvs/stx/stx/libview/styles/iris.style,v 1.18 1997-04-21 09:08:33 cg Exp $
+; $Header: /cvs/stx/stx/libview/styles/iris.style,v 1.19 1997-08-11 11:55:30 cg Exp $
comment 'Silicon graphics'' Iris look alike'
@@ -19,14 +19,22 @@
name #iris
#if Display hasGreyscales
-viewGrey Color grey:67
+viewGrey (Color grey:67) nearestOn:(Screen current)
+veryLightGray (Color veryLightGray) nearestOn:(Screen current)
+darkGray (Color darkGray) nearestOn:(Screen current)
+mediumGray (Color gray:50) nearestOn:(Screen current)
#else
viewGrey Color white
lightColor Color grey:50
+veryLightGray Color veryLightGray
+darkGray Color darkGray
+mediumGray Color gray:50
#endif
+
borderWidth 0
viewBackground =viewGrey
+
popupShadow true
popupLevel 2
popupBorderWidth 1
@@ -47,7 +55,7 @@
#endif
#if (Display hasColors and:[Display depth > 4])
-transcriptForegroundColor Color veryLightGrey
+transcriptForegroundColor =veryLightGray
transcriptBackgroundColor Color red:0 green:0 blue:25
transcriptCursorForegroundColor =transcriptBackgroundColor
transcriptCursorBackgroundColor Color green
@@ -60,7 +68,7 @@
#if Display hasColors
; editFieldBackgroundColor Color red:100 green:75 blue:75
-editFieldBackgroundColor Color scaledRed:16rB9B9 scaledGreen:16r8E8E scaledBlue:16r8E8E
+editFieldBackgroundColor (Color scaledRed:16rB9B9 scaledGreen:16r8E8E scaledBlue:16r8E8E) nearestOn:(Screen current)
editFieldSelectionBackgroundColor Color white
editFieldSelectionForegroundColor Color black
#endif
@@ -89,12 +97,12 @@
scrollerThumbLevel 3
scrollerThumbColor =viewGrey
#if Display hasGreyscales
-scrollerThumbEnteredColor Color veryLightGrey
+scrollerThumbEnteredColor =veryLightGray
#endif
scrollerThumbEdgeStyle #soft
scrollerNTallyMarks 3
scrollerTallyLevel 1
-scrollerGhostColor Color grey:50
+scrollerGhostColor =mediumGray
scrollerGhostLevel -1
#if Display hasGreyscales not
scrollerViewBackground Color white
@@ -106,9 +114,9 @@
buttonEdgeStyle #soft
buttonActiveLevel -1
buttonPassiveLevel 3
-buttonDisabledForegroundColor Color darkGrey
+buttonDisabledForegroundColor =darkGray
#if Display hasGreyscales
-buttonEnteredBackgroundColor Color veryLightGrey
+buttonEnteredBackgroundColor =veryLightGray
buttonActiveBackgroundColor nil
buttonActiveForegroundColor Color black
#else
@@ -136,9 +144,9 @@
pullDownMenuHilightLevel 2
pullDownMenuEdgeStyle #soft
-variablePanelHandleColor Color darkGrey
+variablePanelHandleColor =darkGray
#if Display hasGreyscales
-variablePanelHandleEnteredColor Color veryLightGrey
+variablePanelHandleEnteredColor =veryLightGray
#endif
activeHelpBackgroundColor Color yellow lightened