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

install default-text-color pref value on startup

Browse Source 
svn: r1577
This commit is contained in:
Matthew Flatt 2005-12-10 13:40:07 +00:00
parent a1cd15bda5
commit 08298352d3
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -258,6 +258,7 @@
(preferences:add-callback 'framework:default-text-color (preferences:add-callback 'framework:default-text-color
(λ (p v) (λ (p v)
(editor:set-default-font-color v))) (editor:set-default-font-color v)))
(editor:set-default-font-color (preferences:get 'framework:default-text-color))
;; groups ;; groups