[3444380775
ediware**20090223122615
Ignore-this: 6b732fb6eda341bdddee2fd4664af3c2
] {
hunk ./image.lisp 27
-;;;; $Id: image.lisp,v 1.7 2007/01/05 14:52:08 xach Exp $
+;;;; $Id: image.lisp,v 1.8 2008/01/31 20:25:40 xach Exp $
hunk ./image.lisp 86
- :delay-time 100
+ :delay-time *default-delay-time*
hunk ./image.lisp 147
- (delay-time 100)
+ (delay-time *default-delay-time*)
hunk ./load-gif.lisp 27
-;;;; $Id: load-gif.lisp,v 1.15 2007/01/05 14:48:11 xach Exp $
+;;;; $Id: load-gif.lisp,v 1.16 2008/10/23 00:55:32 xach Exp $
hunk ./load-gif.lisp 193
- (let ((signature-length (read-byte stream)))
- (assert (= signature-length 11))
- (let ((identifier (make-array signature-length :element-type 'octet)))
- (read-sequence identifier stream)
+ (let ((block-size (read-byte stream)))
+ (let ((block (make-array block-size :element-type 'octet)))
+ (read-sequence block stream)
hunk ./load-gif.lisp 199
- (when (equalp identifier *netscape-signature*)
+ (when (equalp block *netscape-signature*)
hunk ./skippy.asd 27
-;;;; $Id: skippy.asd,v 1.14 2007/06/26 21:04:01 xach Exp $
+;;;; $Id: skippy.asd,v 1.15 2008/10/23 00:56:01 xach Exp $
hunk ./skippy.asd 35
- :version "1.3.3"
+ :version "1.3.4"
hunk ./skippy.html 23
-The current version is 1.3.3, released on June 26, 2007.
+The current version is 1.3.4, released on October 22, 2008.
hunk ./skippy.html 594
-the lower-right corner of the image. The canvas
+the lower-right corner of the image. The canvas
hunk ./skippy.html 946
-$Header: /home/cvs/skippy/skippy.html,v 1.34 2007/06/26 21:03:57 xach Exp $
+$Header: /home/cvs/skippy/skippy.html,v 1.36 2008/10/23 00:56:09 xach Exp $
}