[COMMIT] Include many more files in binary-file-regexps, files.el.

Hi Uwe, Ar an fichiú lá de mí Méan Fómhair, scríobh Uwe Brauer: This was previously reported, http://mid.gmane.org/m3r637lpm5.fsf＠mikesoffice.com . It’s a bug in gnus, it should be inserting the files to attach into the current buffer as binary, not relying on autodetection. The work around is to add an entry to file-coding-system-alist mapping PDFs to binary, something like: (push '("\\.pdf\\'" . no-conversion-unix) file-coding-system-alist) It’s worth our while to add this to core XEmacs, which is why I’ve committed the below. I don’t know why you don’t get the bug on 21.4. Best, Aidan APPROVE COMMIT NOTE: This patch has been committed. # HG changeset patch # User Aidan Kehoe <kehoea(a)parhasard.net&gt; # Date 1316632029 -3600 # Node ID c17a46ac63afff076efd957bce958c4afde9da3e # Parent 5273dd66a1ba89ab11a42f5297eb26efd441b301 Include many more files in binary-file-regexps, files.el. lisp/ChangeLog addition: 2011-09-21 Aidan Kehoe <kehoea(a)parhasard.net&gt; * 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. diff -r 5273dd66a1ba -r c17a46ac63af lisp/ChangeLog --- a/lisp/ChangeLog Wed Sep 21 19:14:15 2011 +0100 +++ b/lisp/ChangeLog Wed Sep 21 20:07:09 2011 +0100 ＠＠ -1,3 +1,13 ＠＠ +2011-09-21 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * 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. + 2011-09-21 Aidan Kehoe <kehoea(a)parhasard.net&gt; * select.el (select-convert-to-text): diff -r 5273dd66a1ba -r c17a46ac63af lisp/files.el --- a/lisp/files.el Wed Sep 21 19:14:15 2011 +0100 +++ b/lisp/files.el Wed Sep 21 20:07:09 2011 +0100 ＠＠ -1672,26 +1672,18 ＠＠ If it matches, mode MODE is selected.") (defvar binary-file-regexps - '("\\.\\(?:bz2\\|elc\\|g\\(if\\|z\\)\\|jp\\(eg\\|g\\)\\|png\\|t\\(ar\\|gz\\|iff\\)\\|[Zo]\\)\\'") + '("\\.\\(?: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]\\)\\'") "List of regexps of filenames containing binary (non-text) data.") - ; (eval-when-compile ; (require 'regexp-opt) ; (list ; (format "\\.\\(?:%s\\)\\'" ; (regexp-opt -; '("tar" -; "tgz" -; "gz" -; "bz2" -; "Z" -; "o" -; "elc" -; "png" -; "gif" -; "tiff" -; "jpg" -; "jpeg")))))) +; '("7Z" "7z" "ARC" "EAR" "EXE" "JAR" "LZH" "RAR" "WAR" "XPI" "Z" +; "ZIP" "ZOO" "arc" "bz2" "ear" "elc" "exe" "gif" "gz" "jar" +; "jpeg" "jpg" "lha" "lzh" "o" "odt" "pbm" "pdf" "pgm" "png" +; "pnm" "ppm" "sxc" "sxd" "sxi" "sxm" "sxw" "tar" "tgz" +; "tiff" "war" "xpi" "zip" "zoo"))))) (defvar inhibit-first-line-modes-regexps binary-file-regexps -- ‘Iodine deficiency was endemic in parts of the UK until, through what has been described as “an unplanned and accidental public health triumph”, iodine was added to cattle feed to improve milk production in the 1930s.’ (EN Pearce, Lancet, June 2011) _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-beta