# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1251503326 0
# Node ID 09131c4d5568fb536b3a44c3df014cbe8131052c
# Parent  d02712128030e64cd75cb55e97f87f7e30ad4a28
(magic-fallback-mode-alist): Add ZIP magic number
associated with `archive-mode'.

diff -r d02712128030 -r 09131c4d5568 lisp/files.el
--- 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.