diff --git a/library/freetype/freetype-gl.factor b/library/freetype/freetype-gl.factor
index 091f34a6da..5a8f82462a 100644
--- a/library/freetype/freetype-gl.factor
+++ b/library/freetype/freetype-gl.factor
@@ -160,8 +160,8 @@ C: font ( handle -- font )
     ] with-locked-block ;
 
 : glyph-texture-loc ( glyph font -- loc )
-    font-ascent swap glyph-hori-bearing-y - ft-floor
-    0 swap 0 3array ;
+    over glyph-hori-bearing-x ft-floor -rot
+    font-ascent swap glyph-hori-bearing-y - ft-floor 0 3array ;
 
 : glyph-texture-size ( glyph -- dim )
     dup glyph-bitmap-width next-power-of-2