diff options
| author | Evgeny Zajcev <lg.zevlg@gmail.com> | 2016-12-02 12:09:31 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2016-12-02 12:09:31 +0200 |
| commit | 0b3f8ca863e7df08e79a935946f7190e595cae2b (patch) | |
| tree | fb697d6ba89eafb45c971a1bf52b537dcac6ebe9 /src/image.c | |
| parent | b3ff982a99a2fc330677b13884f9723912668e06 (diff) | |
| download | emacs-0b3f8ca863e7df08e79a935946f7190e595cae2b.tar.gz | |
Support for rawrgb images using imagemagick
* src/image.c (imagemagick_load_image): Set wand size before loading
blob when ':width' and ':height' are provided.
* lisp/image.el (image-format-suffixes): Add 'image/x-rgb'.
Diffstat (limited to 'src/image.c')
| -rw-r--r-- | src/image.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/image.c b/src/image.c index b5b713c9061..a87dc4d4737 100644 --- a/src/image.c +++ b/src/image.c @@ -8540,6 +8540,14 @@ imagemagick_load_image (struct frame *f, struct image *img, status = MagickReadImage (image_wand, filename); else { + Lisp_Object lwidth = image_spec_value (img->spec, QCwidth, NULL); + Lisp_Object lheight = image_spec_value (img->spec, QCheight, NULL); + + if (NATNUMP (lwidth) && NATNUMP (lheight)) + { + MagickSetSize (image_wand, XFASTINT (lwidth), XFASTINT (lheight)); + MagickSetDepth (image_wand, 8); + } filename_hint = imagemagick_filename_hint (img->spec, hint_buffer); MagickSetFilename (image_wand, filename_hint); status = MagickReadImageBlob (image_wand, contents, size); |