X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/1d0ec0d176dbd3af505a5ea4adb023d1a66ac700..03210c3ae665e37b61960b5de473ea6582a9b59f:/lisp/files.el?ds=sidebyside

diff --git a/lisp/files.el b/lisp/files.el
index bfb849ffd6..16df2661fc 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1897,8 +1897,8 @@ in that case, this function acts as if `enable-local-variables' were t."
      ("\\.tar\\'" . tar-mode)
      ;; The list of archive file extensions should be in sync with
      ;; `auto-coding-alist' with `no-conversion' coding system.
-     ("\\.\\(arc\\|zip\\|lzh\\|zoo\\|[jew]ar\\|xpi\\)\\'" . archive-mode)
-     ("\\.\\(ARC\\|ZIP\\|LZH\\|ZOO\\|[JEW]AR\\|XPI\\)\\'" . archive-mode)
+     ("\\.\\(arc\\|zip\\|lzh\\|lha\\|zoo\\|[jew]ar\\|xpi\\)\\'" . archive-mode)
+     ("\\.\\(ARC\\|ZIP\\|LZH\\|LHA\\|ZOO\\|[JEW]AR\\|XPI\\)\\'" . archive-mode)
      ("\\.\\(sx[dmicw]\\|odt\\)\\'" . archive-mode)	; OpenOffice.org
      ;; Mailer puts message to be edited in
      ;; /tmp/Re.... or Message