From df409e8b4e2d0bde49ca6eda1c89f217a509b29f Mon Sep 17 00:00:00 2001 From: Scott Owens Date: Thu, 4 Dec 2003 20:28:22 +0000 Subject: [PATCH] *** empty log message *** original commit: b23e63a864127c83ab378e196dfef3e09db4a536 --- collects/framework/private/main.ss | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/collects/framework/private/main.ss b/collects/framework/private/main.ss index 0b3eab59..9078feeb 100644 --- a/collects/framework/private/main.ss +++ b/collects/framework/private/main.ss @@ -220,12 +220,13 @@ (color-prefs:add "Scheme" `((symbol ,(color-prefs:make-style-delta "navy" #f #f #f)) - (string ,(color-prefs:make-style-delta "ForestGreen" #f #f #f)) - (comment ,(color-prefs:make-style-delta (make-object color% 0 105 255) #f #f #f)) (keyword ,(color-prefs:make-style-delta (make-object color% 40 25 15) #f #f #f)) + (comment ,(color-prefs:make-style-delta (make-object color% 0 105 255) #f #f #f)) + (string ,(color-prefs:make-style-delta "ForestGreen" #f #f #f)) (constant ,(color-prefs:make-style-delta (make-object color% 51 135 39) #f #f #f)) - (base ,(color-prefs:make-style-delta "brown" #f #f #f)) + (parenthesis ,(color-prefs:make-style-delta "brown" #f #f #f)) (error ,(color-prefs:make-style-delta "red" #f #f #f)) + (other ,(color-prefs:make-style-delta "black" #f #f #f)) ;; for check syntax (to be moved elsewhere) (lexically-bound-variable