fix recently introduced bug in drracket test suites
This commit is contained in:
parent
617df05ef7
commit
e777796a74
|
@ -604,8 +604,8 @@
|
||||||
(define (fire-up-drracket-and-run-tests #:use-focus-table? [use-focus-table? #t] run-test)
|
(define (fire-up-drracket-and-run-tests #:use-focus-table? [use-focus-table? #t] run-test)
|
||||||
(on-eventspace-handler-thread 'fire-up-drracket-and-run-tests)
|
(on-eventspace-handler-thread 'fire-up-drracket-and-run-tests)
|
||||||
(let ()
|
(let ()
|
||||||
(use-hash-for-prefs fw:preferences:low-level-put-preferences
|
(use-hash-for-prefs fw:preferences:low-level-get-preference
|
||||||
fw:preferences:low-level-get-preference
|
fw:preferences:low-level-put-preferences
|
||||||
fw:preferences:restore-defaults)
|
fw:preferences:restore-defaults)
|
||||||
|
|
||||||
(parameterize ([current-command-line-arguments #()])
|
(parameterize ([current-command-line-arguments #()])
|
||||||
|
|
Loading…
Reference in New Issue
Block a user