Set no-conversion for network communication

with nntpd.
(gnus-mule-initialize): For safety, set no-conversion for network
communication with nntpd.

1 files changed, 6 insertions, 1 deletions

diff --git a/lisp/gnus/gnus-mule.el b/lisp/gnus/gnus-mule.el
index 13062278ce8..75e224aace9 100644
--- a/lisp/gnus/gnus-mule.el
+++ b/lisp/gnus/gnus-mule.el
@@ -206,7 +206,10 @@ coding-system for reading and writing respectively."
   (add-hook 'message-send-news-hook
             'gnus-mule-message-send-news-function)
   (add-hook 'message-send-mail-hook
-            'gnus-mule-message-send-mail-function))
+            'gnus-mule-message-send-mail-function)
+  (let ((stream (get-process "nntpd")))
+    (if (processp stream)
+        (set-process-coding-system stream 'no-conversion 'no-conversion))))
 
 (gnus-mule-add-group "" 'undecided)
 (gnus-mule-add-group "fj" 'iso-2022-7bit)
@@ -221,4 +224,6 @@ coding-system for reading and writing respectively."
 
 (add-hook 'gnus-startup-hook 'gnus-mule-initialize)
 
+(modify-coding-system-alist 'network "nntp" 'no-conversion)
+
 ;; gnus-mule.el ends here