suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
original commit: b23e63a864127c83ab378e196dfef3e09db4a536
This commit is contained in:
Scott Owens 2003-12-04 20:28:22 +00:00
parent a692f36964
commit df409e8b4e
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/framework/private/main.ss
View File

@ -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