make sure the framework tests run with the proper environment
This commit is contained in:
parent
88404f3b1f
commit
e43583c444
|
@ -111,6 +111,7 @@
|
|||
`(let* ([t (new racket:text%)]
|
||||
[f (new frame% [label ""] [width 600] [height 600])]
|
||||
[ec (new editor-canvas% [parent f] [editor t])])
|
||||
(preferences:set 'framework:fixup-parens #t)
|
||||
(preferences:set 'framework:automatic-parens ,auto-parens?)
|
||||
(send f reflow-container)
|
||||
(send t insert ,initial-text)
|
||||
|
|
Loading…
Reference in New Issue
Block a user