From e5cb0043724ba0cf26e9ecc25702ec800d40cc18 Mon Sep 17 00:00:00 2001
From: eknauel <eknauel>
Date: Tue, 28 Oct 2003 10:28:25 +0000
Subject: [PATCH] + renamed a bogus occurence oft make-xft-draw

---
 scheme/libs/xft.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scheme/libs/xft.scm b/scheme/libs/xft.scm
index 55a5f57..2e79ec3 100644
--- a/scheme/libs/xft.scm
+++ b/scheme/libs/xft.scm
@@ -16,7 +16,7 @@
 (define-exported-binding "xft-font" :xft-font)
 
 (define-record-type xft-draw :xft-draw
-  (make-xft-draw c-pointer)
+  (make-xft-draw-internal c-pointer)
   xft-draw?
   (c-pointer xft-draw-c-pointer))