From 02eb5b15641693151ef6bee46cbe32a94d5ed169 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Thu, 16 Dec 2021 15:06:24 -0800 Subject: [PATCH] core-text: change to not use gl-scale. --- basis/core-text/core-text.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/core-text/core-text.factor b/basis/core-text/core-text.factor index 4637ae1c6d..49d745250b 100644 --- a/basis/core-text/core-text.factor +++ b/basis/core-text/core-text.factor @@ -5,7 +5,7 @@ assocs cache classes colors combinators core-foundation core-foundation.attributed-strings core-foundation.strings core-graphics core-graphics.types core-text.fonts destructors fonts init io.encodings.string io.encodings.utf16n kernel make -math math.functions math.order math.vectors namespaces opengl +math math.functions math.order math.vectors namespaces sequences strings ; IN: core-text @@ -78,7 +78,7 @@ render-loc render-dim ; : metrics>dim ( bounds -- dim ) [ width>> ] [ [ ascent>> ] [ descent>> ] bi + ] bi - gl-scale ceiling >integer gl-unscale 2array ; + ceiling >integer 2array ; : fill-background ( context font dim -- ) [ background>> >rgba-components CGContextSetRGBFillColor ] -- 2.34.1