Mercurial > emacs
changeset 104689:09131c4d5568
(magic-fallback-mode-alist): Add ZIP magic number
associated with `archive-mode'.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Fri, 28 Aug 2009 23:48:46 +0000 |
| parents | d02712128030 |
| children | d3d94e331386 |
| files | lisp/files.el |
| diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Fri Aug 28 22:50:11 2009 +0000 +++ b/lisp/files.el Fri Aug 28 23:48:46 2009 +0000 @@ -2402,6 +2402,7 @@ (defvar magic-fallback-mode-alist `((image-type-auto-detected-p . image-mode) + ("\\(PK00\\)?[P]K\003\004" . archive-mode) ; zip ;; The < comes before the groups (but the first) to reduce backtracking. ;; TODO: UTF-16 <?xml may be preceded by a BOM 0xff 0xfe or 0xfe 0xff. ;; We use [ \t\r\n] instead of `\\s ' to make regex overflow less likely.