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 4637ae1c6d3ac40e7c07740e7314f7ba5e439ccd..49d745250bea32a0cf44593678add6ac828af7b5 100644 (file)
--- 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 ]