fixed up to go with first brutal rep in drscheme
original commit: b73b55851613bcd5ba7c0693ea102357f204b714
This commit is contained in:
parent
3d4c7d5b74
commit
b04da72170
|
@ -193,8 +193,8 @@
|
|||
#t #f
|
||||
(list (let ([c (check-box (lambda (_ command)
|
||||
(set-preference 'mred:file-dialogs (if (send command checked?)
|
||||
'common
|
||||
'std)))
|
||||
'std
|
||||
'common)))
|
||||
"Use platform-specific File Dialogs?")])
|
||||
(send c set-value (eq? (get-preference 'mred:file-dialogs) 'common))
|
||||
c)
|
||||
|
|
Loading…
Reference in New Issue
Block a user