[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r102821: * image.c (imagemagick_load_
From: |
Tassilo Horn |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r102821: * image.c (imagemagick_load_image, Finit_image_library): Free |
Date: |
Tue, 11 Jan 2011 21:14:13 +0100 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 102821
committer: Tassilo Horn <address@hidden>
branch nick: trunk
timestamp: Tue 2011-01-11 21:14:13 +0100
message:
* image.c (imagemagick_load_image, Finit_image_library): Free
intermediate image after creating a MagickWand from it. Terminate
MagickWand environment after image loading.
modified:
src/ChangeLog
src/image.c
=== modified file 'src/ChangeLog'
--- a/src/ChangeLog 2011-01-10 11:28:31 +0000
+++ b/src/ChangeLog 2011-01-11 20:14:13 +0000
@@ -1,3 +1,9 @@
+2011-01-11 Tassilo Horn <address@hidden>
+
+ * image.c (imagemagick_load_image, Finit_image_library): Free
+ intermediate image after creating a MagickWand from it. Terminate
+ MagickWand environment after image loading.
+
2011-01-10 Michael Albinus <address@hidden>
* dbusbind.c (Fdbus_register_service): Raise an error in case of
=== modified file 'src/image.c'
--- a/src/image.c 2011-01-07 22:33:32 +0000
+++ b/src/image.c 2011-01-11 20:14:13 +0000
@@ -7521,6 +7521,9 @@
image. Interface :index is same as for GIF. First we "ping" the
image to see how many sub-images it contains. Pinging is faster
than loading the image to find out things about it. */
+
+ /* MagickWandGenesis() initializes the imagemagick library. */
+ MagickWandGenesis ();
image = image_spec_value (img->spec, QCindex, NULL);
ino = INTEGERP (image) ? XFASTINT (image) : 0;
ping_wand = NewMagickWand ();
@@ -7549,6 +7552,7 @@
img->data.lisp_val));
DestroyMagickWand (ping_wand);
+
/* Now, after pinging, we know how many images are inside the
file. If its not a bundle, just one. */
@@ -7566,6 +7570,7 @@
if (im_image != NULL)
{
image_wand = NewMagickWandFromImage (im_image);
+ DestroyImage(im_image);
status = MagickTrue;
}
else
@@ -7576,7 +7581,7 @@
image_wand = NewMagickWand ();
status = MagickReadImageBlob (image_wand, contents, size);
}
- image_error ("im read failed", Qnil, Qnil);
+
if (status == MagickFalse) goto imagemagick_error;
/* If width and/or height is set in the display spec assume we want
@@ -7805,11 +7810,13 @@
/* Final cleanup. image_wand should be the only resource left. */
DestroyMagickWand (image_wand);
+ MagickWandTerminus ();
return 1;
imagemagick_error:
DestroyMagickWand (image_wand);
+ MagickWandTerminus ();
/* TODO more cleanup. */
image_error ("Error parsing IMAGEMAGICK image `%s'", img->spec, Qnil);
return 0;
@@ -8681,8 +8688,6 @@
#if defined (HAVE_IMAGEMAGICK)
if (EQ (type, Qimagemagick))
{
- /* MagickWandGenesis() initializes the imagemagick library. */
- MagickWandGenesis ();
return CHECK_LIB_AVAILABLE (&imagemagick_type,
init_imagemagick_functions,
libraries);
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r102821: * image.c (imagemagick_load_image, Finit_image_library): Free,
Tassilo Horn <=