GNU bug report logs - #10112
ImageMagick doesn't display some image formats

Previous Next

Full log

View this message in rfc822 format

From: Lars Magne Ingebrigtsen <larsi <at> gnus.org>
To: Juri Linkov <juri <at> jurta.org>
Cc: Wolfgang Jenkner <wjenkner <at> inode.at>, 10112 <at> debbugs.gnu.org
Subject: bug#10112: ImageMagick doesn't display some image formats
Date: Tue, 09 Dec 2014 00:32:49 +0100

Juri Linkov <juri <at> jurta.org> writes:

> -(defconst image-type-header-regexps
> +(defvar image-type-header-regexps
>    `(("\\`/[\t\n\r ]*\\*.*XPM.\\*/" . xpm)
>      ("\\`P[1-6][[:space:]]+\\(?:#.*[[:space:]]+\\)*[0-9]+[[:space:]]+[0-9]+" . pbm)
>      ("\\`GIF8[79]a" . gif)
> @@ -702,7 +704,14 @@ (defun imagemagick-register-types ()
>        (let ((extension (concat "\\." (regexp-opt im-types) "\\'")))
>          (push (cons extension 'image-mode) auto-mode-alist)
>          (push (cons extension 'imagemagick)
> -              image-type-file-name-regexps)))))
> +              image-type-file-name-regexps))
> +      (dolist (header-regexp image-type-header-regexps)
> +        (let ((im-type (cdr header-regexp)))
> +	  (when (and (member (symbol-name im-type) im-types)
> +		     (not (memq (intern (upcase (symbol-name im-type)))
> +				imagemagick-types-inhibit)))
> +	    (push (cons (car header-regexp) 'imagemagick)
> +		  image-type-header-regexps)))))))
>
>  (provide 'image)

This bug was not installed after Emacs 24.1 was released, but it was
marked as "pending".  Is it still applicable? 

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.