ui.backend.cocoa.views: only set gl-scale-factor if > 1.0.

2012-11-01 16:59:45 -07:00 · 2012-11-01 16:59:45 -07:00 · 43d91bcf08
parent 9a9ccf971b
commit 43d91bcf08
1 changed files with 3 additions and 3 deletions
--- a/basis/ui/backend/cocoa/views/views.factor
+++ b/basis/ui/backend/cocoa/views/views.factor
@ -307,9 +307,9 @@ CLASS: FactorView < NSOpenGLView NSTextInput

    METHOD: void prepareOpenGL [
        self 1 -> setWantsBestResolutionOpenGLSurface:
-        self -> backingScaleFactor
-        [ gl-scale-factor set-global ]
-        [ 1.0 > retina? set-global ] bi
+        self -> backingScaleFactor dup 1.0 > [
+            gl-scale-factor set-global t retina? set-global
+        ] [ drop ] if
    ]

    ! Initialization