Make nneething allow CRLF-encoded files (bug#32940)

* lisp/gnus/nneething.el (nneething-request-article):
Bind coding system to raw-text instead of binary when reading a file,
that may be CRLF-encoded (bug#32940).
This commit is contained in:
Katsumi Yamaoka 2018-10-05 00:22:20 +00:00
parent 2cae1cf6f8
commit 79bda3bc47

View file

@ -123,7 +123,7 @@ included.")
(file-exists-p file) ; The file exists. (file-exists-p file) ; The file exists.
(not (file-directory-p file)) ; It's not a dir. (not (file-directory-p file)) ; It's not a dir.
(save-excursion (save-excursion
(let ((nnmail-file-coding-system 'binary)) (let ((nnmail-file-coding-system 'raw-text))
(nnmail-find-file file)) ; Insert the file in the nntp buf. (nnmail-find-file file)) ; Insert the file in the nntp buf.
(unless (nnheader-article-p) ; Either it's a real article... (unless (nnheader-article-p) ; Either it's a real article...
(let ((type (let ((type