From 84fb8eccb7c93f02f972e4bfd20d9a772a94ea48 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 23 Oct 2005 21:50:13 +0000 Subject: [PATCH] fix horizontal positioning of characters --- library/freetype/freetype-gl.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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