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

fixed PR 8368

Browse Source 
svn: r4748
This commit is contained in:
Robby Findler 2006-11-02 04:13:52 +00:00
parent 405a5a2751
commit 9a5eced27b
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/scheme.ss
View File

@ -1511,6 +1511,7 @@
(define check-box (new check-box% (define check-box (new check-box%
[parent main-panel] [parent main-panel]
[label (string-constant fixup-open-brackets)] [label (string-constant fixup-open-brackets)]
[value (preferences:get 'framework:fixup-open-parens)]
[callback [callback
(λ (x y) (λ (x y)
(preferences:set 'framework:fixup-open-parens (send check-box get-value)))])) (preferences:set 'framework:fixup-open-parens (send check-box get-value)))]))