[closure-cvs] CVS closure/src/imagelib

dlichteblau dlichteblau at common-lisp.net
Sun Jan 7 19:52:11 UTC 2007


Update of /project/closure/cvsroot/closure/src/imagelib
In directory clnet:/tmp/cvs-serv21323

Modified Files:
	gif.lisp 
Log Message:

revert accidental change


--- /project/closure/cvsroot/closure/src/imagelib/gif.lisp	2007/01/07 19:33:02	1.3
+++ /project/closure/cvsroot/closure/src/imagelib/gif.lisp	2007/01/07 19:52:11	1.4
@@ -57,7 +57,7 @@
                   (skippy:color-rgb
                    (skippy:color-table-entry gif-color-table color-index))))
           (setf (aref aimage-data y x)
-9D                (dpb r (byte 8 0)
+                (dpb r (byte 8 0)
                      (dpb g (byte 8 8)
                           (dpb b (byte 8 16)
                                (dpb (or a 0) (byte 8 24) 0))))))))




More information about the Closure-cvs mailing list