Yes, it works.
The scenario that I have is like this:
I am trying to down-size a png image so I

open it with with-image-from-file
copy resized image (copy-image old-image new-image ....)
save it (write-image-to-file new-image-file-name :image new-image :compression-level 5)

In my case :compression-level doesn't change the size of the output image. Probably it happens because the original file that I am trying to re-size is already compressed to the maximum.

Thank you,
Andrew

On Wed, Oct 1, 2008 at 7:25 PM, Hans Hübner <hans@huebner.org> wrote:

On Wed, Oct 1, 2008 at 19:24, Hans Hübner <hans@huebner.org> wrote:
> Works for me:

Obviously, I made a copy and paste error. This:

> GD-TEST> (with-open-file (f "/tmp/test.png")
> (file-length f))
> 3005915

is for :compression-level 0, obviously.

-Hans

_______________________________________________
cl-gd-devel site list
cl-gd-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cl-gd-devel