Pass the correct number of arguments to `display-size'. Closes PR 12062.
This commit is contained in:
parent
1b86ff641a
commit
f67d46cd2f
|
@ -263,7 +263,7 @@
|
||||||
(send p get-size sw-box sh-box)
|
(send p get-size sw-box sh-box)
|
||||||
(set-box! sx-box (send p get-x))
|
(set-box! sx-box (send p get-x))
|
||||||
(set-box! sy-box (send p get-y)))
|
(set-box! sy-box (send p get-y)))
|
||||||
(display-size sw-box sh-box #t)))
|
(display-size sw-box sh-box #t 0)))
|
||||||
(let* ([sw (unbox sw-box)]
|
(let* ([sw (unbox sw-box)]
|
||||||
[sh (unbox sh-box)]
|
[sh (unbox sh-box)]
|
||||||
[fw (unbox w-box)]
|
[fw (unbox w-box)]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user