Skip to content

GitLab

Commit 8d0dd9d2 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(format-alist): Don't handle compression here.

parent 3bb846b8
Show whitespace changes
Inline Side-by-side
Showing with 2 additions and 5 deletions
lisp/format.el
View file @ 8d0dd9d2
...@@ -64,10 +64,7 @@ ...@@ -64,10 +64,7 @@
(put 'buffer-file-format 'permanent-local t) (put 'buffer-file-format 'permanent-local t)
(defvar format-alist (defvar format-alist
'((compressed "compressed" '((text/enriched "Extended MIME text/enriched format."
"^\037\213" ; magic number for gzip
"gunzip -f" "gzip -f" t nil)
(text/enriched "Extended MIME text/enriched format."
"Content-[Tt]ype:[ \t]*text/enriched" "Content-[Tt]ype:[ \t]*text/enriched"
enriched-decode enriched-encode t enriched-mode) enriched-decode enriched-encode t enriched-mode)
(plain "ISO 8859-1 standard format, no text properties." (plain "ISO 8859-1 standard format, no text properties."
...@@ -106,7 +103,7 @@ ...@@ -106,7 +103,7 @@
iso-german iso-cvt-read-only t nil) iso-german iso-cvt-read-only t nil)
(esnet "net Spanish" (esnet "net Spanish"
"1\\(^\\)" "1\\(^\\)"
iso-spanish iso-cvt-read-onlyt nil)) iso-spanish iso-cvt-read-only t nil))
"List of information about understood file formats. "List of information about understood file formats.
Elements are of the form \(NAME DOC-STR REGEXP FROM-FN TO-FN MODIFY MODE-FN). Elements are of the form \(NAME DOC-STR REGEXP FROM-FN TO-FN MODIFY MODE-FN).
NAME is a symbol, which is stored in `buffer-file-format'. NAME is a symbol, which is stored in `buffer-file-format'.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment