blob: 00efcfa40a643d24e019e2df59f414439f9b684a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
$NetBSD: patch-ae,v 1.1 2006/04/19 13:13:05 tonio Exp $
--- ttfont.ml.orig 2003-01-06 11:49:14.000000000 +0100
+++ ttfont.ml
@@ -52,7 +52,7 @@ let load_face =
let build face dpi pt unicode =
set_char_size face (float dpi) (float dpi) pt pt;
- let advx, advy = render_char face unicode [] Render_Mono in
+ let _advx, _advy = render_char face unicode [] Render_Mono in
let bitmapinfo = get_bitmap_info face in
let width = bitmapinfo.bitmap_width in
let height = bitmapinfo.bitmap_height in
|
