fixed PR 8368

svn: r4748
2006-11-02 04:13:52 +00:00 · 2006-11-02 04:13:52 +00:00 · 9a5eced27b
commit 9a5eced27b
parent 405a5a2751
1 changed files with 1 additions and 0 deletions
--- a/collects/framework/private/scheme.ss
+++ b/collects/framework/private/scheme.ss
@ -1511,6 +1511,7 @@
        (define check-box (new check-box% 
                               [parent main-panel]
                               [label (string-constant fixup-open-brackets)]
+                               [value (preferences:get 'framework:fixup-open-parens)]
                               [callback 
                                (λ (x y)
                                  (preferences:set 'framework:fixup-open-parens (send check-box get-value)))]))