From 39dc58a5a8973ce499e0ef203093b772775c5b0a Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Fri, 29 Mar 2013 14:47:53 -0700 Subject: [PATCH] ui.backend.cocoa.views: spacing. --- basis/ui/backend/cocoa/views/views.factor | 2 ++ 1 file changed, 2 insertions(+) diff --git a/basis/ui/backend/cocoa/views/views.factor b/basis/ui/backend/cocoa/views/views.factor index faa9c24b84..f22f9ccb50 100644 --- a/basis/ui/backend/cocoa/views/views.factor +++ b/basis/ui/backend/cocoa/views/views.factor @@ -152,6 +152,7 @@ CLASS: FactorView < NSOpenGLView NSTextInput METHOD: void prepareOpenGL [ os-version { 10 7 0 } after=? [ + self "setWantsBestResolutionOpenGLSurface:" selector/sender 1 swap execute( x x x -- ) @@ -160,6 +161,7 @@ CLASS: FactorView < NSOpenGLView NSTextInput dup 1.0 > [ gl-scale-factor set-global t retina? set-global ] [ drop ] if + ] when ]