From 08c0960cbfc834506743a2e2cd532f6c89374a4a Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Mon, 9 Feb 2009 22:51:53 -0600
Subject: [PATCH] Fix ui.text.freetype to work across image save/reload
---
basis/ui/text/freetype/freetype.factor | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/basis/ui/text/freetype/freetype.factor b/basis/ui/text/freetype/freetype.factor
index b65e567882..fc7534666f 100644
--- a/basis/ui/text/freetype/freetype.factor
+++ b/basis/ui/text/freetype/freetype.factor
@@ -94,7 +94,7 @@ MEMO: (open-font) ( font -- open-font )
GENERIC: open-font ( font -- open-font )
M: font open-font
- clone f >>background f >>foreground (open-font) ;
+ freetype drop clone f >>background f >>foreground (open-font) ;
: load-glyph ( font char -- glyph )
[ handle>> dup ] dip 0 FT_Load_Char