From 7a5fc2088b0d4c96a0bea573e2c7a16f7c9551d7 Mon Sep 17 00:00:00 2001
From: Julian Squires <julian@cipht.net>
Date: Tue, 11 Nov 2008 11:26:38 -0500
Subject: [PATCH] Trivial fix of WITH-IMAGES.

---
 utilities.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/utilities.lisp b/utilities.lisp
index d0b5a9e..6da42f0 100644
--- a/utilities.lisp
+++ b/utilities.lisp
@@ -19,7 +19,7 @@
   (let ((ids (gensym))
         (count (length images)))
     `(cffi:with-foreign-object (,ids :uint ,count)
-       (il:gen-images ,count ,ids)
+       (%gen-images ,count ,ids)
        (unwind-protect
             (let (,@(loop for x in images
                        for (var . args) = (if (listp x) x (list x))
-- 
2.11.4.GIT