aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2009-08-28 23:48:46 +0000
committerJuri Linkov2009-08-28 23:48:46 +0000
commite15f58f871d90d1bdbbeb907bc81d85f29ae0b13 (patch)
tree5d619d66159de190d5d5feb929e3dd99c7811f34
parent890617cbfdfa8b4b01d9d06b243f58e15c0350c4 (diff)
downloademacs-e15f58f871d90d1bdbbeb907bc81d85f29ae0b13.tar.gz
emacs-e15f58f871d90d1bdbbeb907bc81d85f29ae0b13.zip
(magic-fallback-mode-alist): Add ZIP magic number
associated with `archive-mode'.
-rw-r--r--lisp/files.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 2c695c1d4bd..a23408a0beb 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -2402,6 +2402,7 @@ If FUNCTION is nil, then it is not called. (That is a way of saying
2402 2402
2403(defvar magic-fallback-mode-alist 2403(defvar magic-fallback-mode-alist
2404 `((image-type-auto-detected-p . image-mode) 2404 `((image-type-auto-detected-p . image-mode)
2405 ("\\(PK00\\)?[P]K\003\004" . archive-mode) ; zip
2405 ;; The < comes before the groups (but the first) to reduce backtracking. 2406 ;; The < comes before the groups (but the first) to reduce backtracking.
2406 ;; TODO: UTF-16 <?xml may be preceded by a BOM 0xff 0xfe or 0xfe 0xff. 2407 ;; TODO: UTF-16 <?xml may be preceded by a BOM 0xff 0xfe or 0xfe 0xff.
2407 ;; We use [ \t\r\n] instead of `\\s ' to make regex overflow less likely. 2408 ;; We use [ \t\r\n] instead of `\\s ' to make regex overflow less likely.