--- a/styles/decWindows.style Fri Oct 27 15:23:13 2000 +0200
+++ b/styles/decWindows.style Fri Oct 27 19:57:39 2000 +0200
@@ -4,12 +4,12 @@
; like motif
;
;
-; $Header: /cvs/stx/stx/libview/styles/decWindows.style,v 1.8 2000-03-21 17:49:16 stefan Exp $
+; $Header: /cvs/stx/stx/libview/styles/decWindows.style,v 1.9 2000-10-27 17:57:39 stefan Exp $
#if Screen current isNil or:[Screen current hasGreyscales]
viewGrey (Color grey:60) "/ (Color grey:59.6078)
scrollerVB (Color grey:50) "/ (Color grey:50.1961)
-selectionInListColor (Color red:66.7 green:66.7 blue:66.7)
+selectionInListColor (Color grey:66.7)
#endif
#if Screen current isNil or:[Screen current hasColors]
@@ -66,7 +66,7 @@
checkToggle.bitmapFile 'CheckOn14Dec.xbm'
checkToggle.activeBackgroundColor =scrollerVB
checkToggle.backgroundColor =viewGrey
-checkToggle.disabledForegroundColor Color gray:33
+checkToggle.disabledForegroundColor Color grey:33
checkToggle.activeLevel -1
checkBoxStyle #dummy
@@ -84,7 +84,7 @@
; selection.hilightFrameColor =orange
selection.hilightFrameColor nil
selection.font =menuFont
-selection.disabledForegroundColor Color gray:25
+selection.disabledForegroundColor Color grey:25
editField.backgroundColor =selectionInListColor
editField.foregroundColor =textForeground
@@ -93,7 +93,7 @@
editField.cursorType #Ibeam
editField.cursorForegroundColor nil
editField.cursorBackgroundColor Color white
-editField.disabledForegroundColor Color gray:33
+editField.disabledForegroundColor Color grey:33
ruler.backgroundColor =scrollerVB
focusBorderWidth 2
--- a/styles/kde.style Fri Oct 27 15:23:13 2000 +0200
+++ b/styles/kde.style Fri Oct 27 19:57:39 2000 +0200
@@ -2,17 +2,17 @@
;
; kde look-alike style
;
-;; $Header: /cvs/stx/stx/libview/styles/kde.style,v 1.4 2000-08-15 14:51:36 cg Exp $
+;; $Header: /cvs/stx/stx/libview/styles/kde.style,v 1.5 2000-10-27 17:57:39 stefan Exp $
#if Screen current hasGreyscales
;
; use #nearestOn to avoid dithered view backgrounds
;
-viewGrey (Color redByte:192 greenByte:192 blueByte:192) exactOrNearestOn:(Screen current)
-lightColor (Color white)
+viewGrey (Color grey:75) exactOrNearestOn:(Screen current)
+lightColor Color white
shadowColor (Color grey:25) exactOrNearestOn:(Screen current)
mediumColor (Color grey:50) exactOrNearestOn:(Screen current)
-slightlyDarkerGrey (Color redByte:160 greenByte:160 blueByte:160) exactOrNearestOn:(Screen current)
+slightlyDarkerGrey (Color grey:62) exactOrNearestOn:(Screen current)
#else
viewGrey Color white
lightColor Color grey:75
@@ -50,7 +50,7 @@
; although the following is not really motif, it looks much better ...
;
#if Screen current hasColors
-editField.backgroundColor (Color white)
+editField.backgroundColor Color white
editField.selectionBackgroundColor Color blue darkened
editField.selectionForegroundColor Color white
#else