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

closes PR 11134

Browse Source
This commit is contained in:
Robby Findler 2010-09-08 17:02:29 -05:00
parent 8fae368376
commit 41e4470f23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/drracket/private/language-configuration.rkt
View File

@ -1826,7 +1826,7 @@
[min-height (floor (/ (send plt-logo-shiny get-height) 2))]) [min-height (floor (/ (send plt-logo-shiny get-height) 2))])
(new canvas-message% (new canvas-message%
(parent racketeer-panel) (parent racketeer-panel)
(label sc-use-language-in-source) (label (string-constant use-language-in-source))
(color (send the-color-database find-color "blue")) (color (send the-color-database find-color "blue"))
(callback (λ () (change-current-lang-to (λ (x) (is-a? x drracket:module-language:module-language<%>))))) (callback (λ () (change-current-lang-to (λ (x) (is-a? x drracket:module-language:module-language<%>)))))
(font (get-font #:underlined #t)))) (font (get-font #:underlined #t))))