[cl-gd-devel] PNG compression

Andrei Stebakov lispercat at gmail.com
Thu Oct 2 15:22:29 UTC 2008


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

   1. open it with with-image-from-file
   2. copy resized image (copy-image old-image new-image ....)
   3. 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 at huebner.org> wrote:

> On Wed, Oct 1, 2008 at 19:24, Hans Hübner <hans at 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 at common-lisp.net
> http://common-lisp.net/mailman/listinfo/cl-gd-devel
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-gd-devel/attachments/20081002/430ef943/attachment.html>


More information about the Cl-gd-devel mailing list