From: John Benediktsson <mrjbq7@gmail.com>
Date: Thu, 16 Dec 2021 23:06:24 +0000 (-0800)
Subject: core-text: change to not use gl-scale.
X-Git-Tag: 0.99~2199
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=02eb5b15641693151ef6bee46cbe32a94d5ed169

core-text: change to not use gl-scale.
---

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 ]