correct top-left offset

This commit is contained in:
Jay McCarthy 2017-09-04 15:50:19 +01:00
parent 9032857bcb
commit 7f682a5461
1 changed files with 1 additions and 1 deletions

View File

@ -41,7 +41,7 @@
[start-fullscreen?
(define-values (x y) (get-display-left-top-inset #t))
(define-values (w h) (get-display-size #t))
(values (* -1 x) (* -1 y) w h)]
(values x y w h)]
[else
(values the-start-x the-start-y the-init-w the-init-h)]))