(file-name-buffer-file-type-alist): Add more

extensions for binary files.

diff --git a/lisp/dos-w32.el b/lisp/dos-w32.el
index 71db8f9513bebd53510cb0e70a0fcc57659743d8..ee43f256e4fb7c85472f745eebc3ccd7d221f1ef 100644 (file)
--- a/lisp/dos-w32.el
+++ b/lisp/dos-w32.el
@@ -44,11 +44,15 @@
   '(
     ("[:/].*config.sys$" . nil)                ; config.sys text
     ("\\.elc$" . t)                    ; emacs stuff
-    ("\\.\\(obj\\|exe\\|com\\|lib\\|sys\\|chk\\|out\\|bin\\|ico\\|pif\\)$" . t)
+    ("\\.\\(obj\\|exe\\|com\\|lib\\|sym\\|sys\\|chk\\|out\\|bin\\|ico\\|pif\\|dos\\|class\\)$" . t)
                                        ; MS-Dos stuff
+    ("\\.\\(dll\\|drv\\|cpl\\|scr\\vbx\\|386\\|vxd\\|fon\\|fnt\\|fot\\|ttf\\|grp\\)$" . t)
+                                       ; Windows stuff
+    ("\\.\\(hlp\\|bmp\\|wav\\|avi\\|mpg\\|jpg\\|tif\\mov\\au\\)" . t)
+                                       ; known binary data files
     ("\\.\\(arc\\|zip\\|pak\\|lzh\\|zoo\\)$" . t)
                                        ; Packers
-    ("\\.\\(a\\|o\\|tar\\|z\\|gz\\|taz\\)$" . t)
+    ("\\.\\(a\\|o\\|tar\\|z\\|gz\\|taz\\|jar\\)$" . t)
                                        ; Unix stuff
     ("\\.tp[ulpw]$" . t)
                                        ; Borland Pascal stuff