Pass the correct number of arguments to `display-size'. Closes PR 12062.

This commit is contained in:
Sam Tobin-Hochstadt 2011-07-19 16:38:02 -04:00
parent 1b86ff641a
commit f67d46cd2f

View File

@ -263,7 +263,7 @@
(send p get-size sw-box sh-box)
(set-box! sx-box (send p get-x))
(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)]
[sh (unbox sh-box)]
[fw (unbox w-box)]