[mcclim-cvs] CVS mcclim/Experimental/freetype

[ahefner]

Update of /project/mcclim/cvsroot/mcclim/Experimental/freetype
In directory clnet:/tmp/cvs-serv25588

Modified Files:
	freetype-fonts.lisp 
Log Message:
Didn't mean to leave any of those in there.


--- /project/mcclim/cvsroot/mcclim/Experimental/freetype/freetype-fonts.lisp	2008/01/05 22:58:57	1.13
+++ /project/mcclim/cvsroot/mcclim/Experimental/freetype/freetype-fonts.lisp	2008/01/05 23:04:15	1.14
@@ -306,7 +306,6 @@
   (defmethod clim-clx::font-draw-glyphs ((font freetype-face) mirror gc x y string &key start end translate)
     (declare (optimize (speed 3)))
     (when (< (length buffer) (- end start))
-      (hef:debugf "fuck!")
       (setf buffer (make-array (* 256 (ceiling (- end start) 256))
                                :element-type '(unsigned-byte 32)
                                :adjustable nil :fill-pointer nil)))