aboutsummaryrefslogtreecommitdiffstats
path: root/src/image.c
diff options
context:
space:
mode:
authorJoakim Verona2013-08-13 22:26:49 +0200
committerJoakim Verona2013-08-13 22:26:49 +0200
commitf2e32ba803f53e08cc65f75d51a4a8c3e01357b3 (patch)
tree0153f18db8433eed5cb8b159171da2887d9331e3 /src/image.c
parent527a4d099e6ad4a5615c28c3071757ad3a0dbf9a (diff)
parenta5bd5abb645ea5c0e5bb45425128166af44dc237 (diff)
downloademacs-f2e32ba803f53e08cc65f75d51a4a8c3e01357b3.tar.gz
emacs-f2e32ba803f53e08cc65f75d51a4a8c3e01357b3.zip
merge from trunk
Diffstat (limited to 'src/image.c')
-rw-r--r--src/image.c12
1 files changed, 5 insertions, 7 deletions
diff --git a/src/image.c b/src/image.c
index 4974903fed7..e767d5447d1 100644
--- a/src/image.c
+++ b/src/image.c
@@ -551,7 +551,6 @@ static Lisp_Object QCheuristic_mask;
551static Lisp_Object QCcolor_symbols; 551static Lisp_Object QCcolor_symbols;
552static Lisp_Object QCindex, QCmatrix, QCcolor_adjustment, QCmask, QCgeometry; 552static Lisp_Object QCindex, QCmatrix, QCcolor_adjustment, QCmask, QCgeometry;
553static Lisp_Object QCcrop, QCrotation; 553static Lisp_Object QCcrop, QCrotation;
554static Lisp_Object QCcontent_type;
555 554
556/* Other symbols. */ 555/* Other symbols. */
557 556
@@ -7741,7 +7740,7 @@ enum imagemagick_keyword_index
7741 IMAGEMAGICK_WIDTH, 7740 IMAGEMAGICK_WIDTH,
7742 IMAGEMAGICK_MAX_HEIGHT, 7741 IMAGEMAGICK_MAX_HEIGHT,
7743 IMAGEMAGICK_MAX_WIDTH, 7742 IMAGEMAGICK_MAX_WIDTH,
7744 IMAGEMAGICK_CONTENT_TYPE, 7743 IMAGEMAGICK_FORMAT,
7745 IMAGEMAGICK_ROTATION, 7744 IMAGEMAGICK_ROTATION,
7746 IMAGEMAGICK_CROP, 7745 IMAGEMAGICK_CROP,
7747 IMAGEMAGICK_LAST 7746 IMAGEMAGICK_LAST
@@ -7766,7 +7765,7 @@ static struct image_keyword imagemagick_format[IMAGEMAGICK_LAST] =
7766 {":width", IMAGE_INTEGER_VALUE, 0}, 7765 {":width", IMAGE_INTEGER_VALUE, 0},
7767 {":max-height", IMAGE_INTEGER_VALUE, 0}, 7766 {":max-height", IMAGE_INTEGER_VALUE, 0},
7768 {":max-width", IMAGE_INTEGER_VALUE, 0}, 7767 {":max-width", IMAGE_INTEGER_VALUE, 0},
7769 {":content-type", IMAGE_SYMBOL_VALUE, 0}, 7768 {":format", IMAGE_SYMBOL_VALUE, 0},
7770 {":rotation", IMAGE_NUMBER_VALUE, 0}, 7769 {":rotation", IMAGE_NUMBER_VALUE, 0},
7771 {":crop", IMAGE_DONT_CHECK_VALUE_TYPE, 0} 7770 {":crop", IMAGE_DONT_CHECK_VALUE_TYPE, 0}
7772 }; 7771 };
@@ -7851,15 +7850,15 @@ imagemagick_error (MagickWand *wand)
7851static char* 7850static char*
7852imagemagick_filename_hint (Lisp_Object spec) 7851imagemagick_filename_hint (Lisp_Object spec)
7853{ 7852{
7854 Lisp_Object content_type = image_spec_value (spec, QCcontent_type, NULL); 7853 Lisp_Object format = image_spec_value (spec, intern (":format"), NULL);
7855 Lisp_Object symbol = intern ("image-content-type-suffixes"); 7854 Lisp_Object symbol = intern ("image-format-suffixes");
7856 Lisp_Object val; 7855 Lisp_Object val;
7857 char *name, *prefix = "/tmp/foo."; 7856 char *name, *prefix = "/tmp/foo.";
7858 7857
7859 if (NILP (Fboundp (symbol))) 7858 if (NILP (Fboundp (symbol)))
7860 return NULL; 7859 return NULL;
7861 7860
7862 val = Fassq (content_type, Fsymbol_value (symbol)); 7861 val = Fassq (format, Fsymbol_value (symbol));
7863 if (! CONSP (val)) 7862 if (! CONSP (val))
7864 return NULL; 7863 return NULL;
7865 7864
@@ -9155,7 +9154,6 @@ non-numeric, there is no explicit limit on the size of images. */);
9155 DEFSYM (Qpostscript, "postscript"); 9154 DEFSYM (Qpostscript, "postscript");
9156 DEFSYM (QCmax_width, ":max-width"); 9155 DEFSYM (QCmax_width, ":max-width");
9157 DEFSYM (QCmax_height, ":max-height"); 9156 DEFSYM (QCmax_height, ":max-height");
9158 DEFSYM (QCcontent_type, ":content-type");
9159#ifdef HAVE_GHOSTSCRIPT 9157#ifdef HAVE_GHOSTSCRIPT
9160 ADD_IMAGE_TYPE (Qpostscript); 9158 ADD_IMAGE_TYPE (Qpostscript);
9161 DEFSYM (QCloader, ":loader"); 9159 DEFSYM (QCloader, ":loader");