XEmacs 21.2.14.

[chise/xemacs-chise.git.1] / lisp / format.el

diff --git a/lisp/format.el b/lisp/format.el
index 2b4c609..7542247 100644 (file)
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -69,20 +69,21 @@
 (put 'buffer-file-format 'permanent-local t)
 
 (defvar format-alist
-  '((image/jpeg "JPEG image" "\377\330\377\340\000\020JFIF"
-               image-decode-jpeg nil t image-mode)
-    (image/gif "GIF image" "GIF8[79]"
-              image-decode-gif nil t image-mode)
-    (image/png "Portable Network Graphics" "\211PNG"
-              image-decode-png nil t image-mode)
-    (image/x-xpm "XPM image" "/\\* XPM \\*/"
-                image-decode-xpm nil t image-mode)
-
-    ;; TIFF files have lousy magic
-    (image/tiff "TIFF image" "II\\*\000"
-               image-decode-tiff nil t image-mode) ;; TIFF 6.0 big-endian
-    (image/tiff "TIFF image" "MM\000\\*"
-               image-decode-tiff nil t image-mode) ;; TIFF 6.0 little-endian
+  '(
+;    (image/jpeg "JPEG image" "\377\330\377\340\000\020JFIF"
+;              image-decode-jpeg nil t image-mode)
+;    (image/gif "GIF image" "GIF8[79]"
+;             image-decode-gif nil t image-mode)
+;    (image/png "Portable Network Graphics" "\211PNG"
+;             image-decode-png nil t image-mode)
+;    (image/x-xpm "XPM image" "/\\* XPM \\*/"
+;               image-decode-xpm nil t image-mode)
+
+;    ;; TIFF files have lousy magic
+;    (image/tiff "TIFF image" "II\\*\000"
+;              image-decode-tiff nil t image-mode) ;; TIFF 6.0 big-endian
+;    (image/tiff "TIFF image" "MM\000\\*"
+;              image-decode-tiff nil t image-mode) ;; TIFF 6.0 little-endian
 
     (text/enriched "Extended MIME text/enriched format."
                   "Content-[Tt]ype:[ \t]*text/enriched"