Round mouse co-ordinates

2009-03-23 23:15:53 -05:00 · 2009-03-23 23:15:53 -05:00 · 53369cf5ff
parent 862223fa79
commit 53369cf5ff
1 changed files with 1 additions and 1 deletions
--- a/basis/cocoa/views/views.factor
+++ b/basis/cocoa/views/views.factor
@ -89,4 +89,4 @@ PRIVATE>
        -> locationInWindow f -> convertPoint:fromView:
        [ CGPoint-x ] [ CGPoint-y ] bi
    ] [ drop -> frame CGRect-h ] 2bi
-    swap - 2array ;
+    swap - [ >integer ] bi@ 2array ;