original commit: 57af913ab8eb82819930db253c9301b20b1cd107
This commit is contained in:
Matthew Flatt 2002-01-22 20:51:37 +00:00
parent 81ddc29aca
commit e6f5c70ad8

View File

@ -2942,7 +2942,7 @@
(sequence
(let ([cwho '(iconstructor subarea)])
(unless (eq? horiz-margin no-val) (check-margin-integer cwho horiz-margin))
(unless (eq? horiz-margin no-val) (check-margin-integer cwho vert-margin))))
(unless (eq? vert-margin no-val) (check-margin-integer cwho vert-margin))))
(private-field [get-wx-panel get-wx-pan])
(public
[(hm horiz-margin) (param get-wx-panel x-margin)]