[racket] problem with pict->bitmap and mrlib/write-animated-gif

Solved, with help from Jens Soegaard; I had to modify mrlib/write-gifs to
take a disposal argument, and use it in all calls to gif-add-control.

martin

On Sat, Sep 27, 2014 at 12:27 AM, Martin DeMello <martindemello at gmail.com>
wrote:

> Can't figure it out, but something in the interaction between pict->bitmap
> and write-animated-gif is causing the frames to display one on top of the
> other when viewing the gif.
>
> #lang racket
>
> (require pict
>          mrlib/gif)
>
> (define (draw-frame i)
>   (pict->bitmap (circle (* 50 i))))
>
> (write-animated-gif
>  (map draw-frame (sequence->list (in-range 1 10)))
>  10
>  "test1.gif"
>  #:loop? true
>  #:one-at-a-time? true)
>
> martin
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20140927/a42ef6eb/attachment.html>