original commit: 7ee9ec6baedf512b598dab2b4843b2f04cb2e351
This commit is contained in:
Matthew Flatt 1998-08-11 14:25:06 +00:00
parent d639accaa4
commit ddf4e87067

View File

@ -2733,7 +2733,7 @@
(define get-ps-setup-from-user
(case-lambda
[() (get-ps-setup-from-user parent null)]
[() (get-ps-setup-from-user #f null)]
[(parent) (get-ps-setup-from-user parent null)]
[(parent style)
(define pss (wx:current-ps-setup))