Mercurial > emacs
changeset 109855:ecac5346ac63
initial support for supplying image count property for image bundles
by imagemagick.
author | Joakim <joakim@localhost.localdomain> |
---|---|
date | Fri, 14 May 2010 10:19:30 +0200 |
parents | e5961598b18a |
children | 4baaa8ac0f74 |
files | src/image.c |
diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/image.c Thu May 13 16:04:53 2010 +0200 +++ b/src/image.c Fri May 14 10:19:30 2010 +0200 @@ -7926,6 +7926,14 @@ ximg->data); } + + //TODO figure out imagecount here! + if (MagickGetNumberImages(image_wand) > 1) + img->data.lisp_val = Fcons (Qcount, + Fcons (make_number (MagickGetNumberImages(image_wand)), + img->data.lisp_val)); + + #ifdef COLOR_TABLE_SUPPORT /* Remember colors allocated for this image. */ img->colors = colors_in_color_table (&img->ncolors);