Include many more files in binary-file-regexps, files.el.
authorAidan Kehoe <kehoea@parhasard.net>
Wed, 21 Sep 2011 20:07:09 +0100
changeset 5572c17a46ac63af
parent 5571 5273dd66a1ba
child 5573 f0f1fd0d8486
Include many more files in binary-file-regexps, files.el.

lisp/ChangeLog addition:

2011-09-21 Aidan Kehoe <kehoea@parhasard.net>

* files.el (binary-file-regexps):
Update this, adding everything that maps to no-conversion or
no-conversion-multibyte in GNU's auto-mode-alist.
In particular, add PDFs, important given gnus' problem with them
of http://mid.gmane.org/m3r637lpm5.fsf@mikesoffice.com and the
associated thread, and Uwe's recent re-reporting of the same
problem.
lisp/ChangeLog
lisp/files.el
     1.1 --- a/lisp/ChangeLog	Wed Sep 21 19:14:15 2011 +0100
     1.2 +++ b/lisp/ChangeLog	Wed Sep 21 20:07:09 2011 +0100
     1.3 @@ -1,3 +1,13 @@
     1.4 +2011-09-21  Aidan Kehoe  <kehoea@parhasard.net>
     1.5 +
     1.6 +	* files.el (binary-file-regexps):
     1.7 +	Update this, adding everything that maps to no-conversion or
     1.8 +	no-conversion-multibyte in GNU's auto-mode-alist.
     1.9 +	In particular, add PDFs, important given gnus' problem with them
    1.10 +	of http://mid.gmane.org/m3r637lpm5.fsf@mikesoffice.com and the
    1.11 +	associated thread, and Uwe's recent re-reporting of the same
    1.12 +	problem.
    1.13 +
    1.14  2011-09-21  Aidan Kehoe  <kehoea@parhasard.net>
    1.15  
    1.16  	* select.el (select-convert-to-text):
     2.1 --- a/lisp/files.el	Wed Sep 21 19:14:15 2011 +0100
     2.2 +++ b/lisp/files.el	Wed Sep 21 20:07:09 2011 +0100
     2.3 @@ -1672,26 +1672,18 @@
     2.4  If it matches, mode MODE is selected.")
     2.5  
     2.6  (defvar binary-file-regexps
     2.7 -  '("\\.\\(?:bz2\\|elc\\|g\\(if\\|z\\)\\|jp\\(eg\\|g\\)\\|png\\|t\\(ar\\|gz\\|iff\\)\\|[Zo]\\)\\'")
     2.8 +  '("\\.\\(?:7[Zz]\\|ARC\\|E\\(?:AR\\|XE\\)\\|JAR\\|LZH\\|RAR\\|WAR\\|XPI\\|Z\\(?:IP\\|OO\\)\\|arc\\|bz2\\|e\\(?:ar\\|lc\\|xe\\)\\|g\\(?:if\\|z\\)\\|j\\(?:ar\\|p\\(?:e?g\\)\\)\\|l\\(?:ha\\|zh\\)\\|odt\\|p\\(?:bm\\|df\\|gm\\|n[gm]\\|pm\\)\\|sx[cdimw]\\|t\\(?:ar\\|gz\\|iff\\)\\|war\\|xpi\\|z\\(?:ip\\|oo\\)\\|[Zo]\\)\\'")
     2.9    "List of regexps of filenames containing binary (non-text) data.")
    2.10 -
    2.11  ;   (eval-when-compile
    2.12  ;     (require 'regexp-opt)
    2.13  ;     (list
    2.14  ;      (format "\\.\\(?:%s\\)\\'"
    2.15  ;	      (regexp-opt
    2.16 -;	       '("tar"
    2.17 -;		 "tgz"
    2.18 -;		 "gz"
    2.19 -;		 "bz2"
    2.20 -;		 "Z"
    2.21 -;		 "o"
    2.22 -;		 "elc"
    2.23 -;		 "png"
    2.24 -;		 "gif"
    2.25 -;		 "tiff"
    2.26 -;		 "jpg"
    2.27 -;		 "jpeg"))))))
    2.28 +;               '("7Z" "7z" "ARC" "EAR" "EXE" "JAR" "LZH" "RAR" "WAR" "XPI" "Z"
    2.29 +;                 "ZIP" "ZOO" "arc" "bz2" "ear" "elc" "exe" "gif" "gz" "jar"
    2.30 +;                 "jpeg" "jpg" "lha" "lzh" "o" "odt" "pbm" "pdf" "pgm" "png"
    2.31 +;                 "pnm" "ppm" "sxc" "sxd" "sxi" "sxm" "sxw" "tar" "tgz"
    2.32 +;                 "tiff" "war" "xpi" "zip" "zoo")))))
    2.33  
    2.34  (defvar inhibit-first-line-modes-regexps
    2.35    binary-file-regexps