diff options
author | Kenichi Handa <handa@m17n.org> | 1997-09-26 01:50:55 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1997-09-26 01:50:55 +0000 |
commit | edd0c4e450a93a5c165db9ee75ead6ea967f7105 (patch) | |
tree | 2f46255d9bea70ae5e01c358d8a12b7eaf237f77 /lisp/gnus | |
parent | 7b98959848c7cda656bc7659b81ea82d7393f9ff (diff) | |
download | emacs-edd0c4e450a93a5c165db9ee75ead6ea967f7105.tar.gz |
(nntp-coding-system-for-write): New variable.
(nntp-open-connection): Bind coding-system-for-write to
nntp-coding-system-for-write.
Diffstat (limited to 'lisp/gnus')
-rw-r--r-- | lisp/gnus/nntp.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el index 0cca4cc32e6..d73bf1c87c0 100644 --- a/lisp/gnus/nntp.el +++ b/lisp/gnus/nntp.el @@ -151,7 +151,10 @@ server there that you can connect to. See also `nntp-open-connection-function'" ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp> (defvoo nntp-coding-system-for-read nil - "*coding-system for read from NNTP.") + "*Coding system to read from NNTP.") + +(defvoo nntp-coding-system-for-write nil + "*Coding system to write to NNTP.") @@ -750,7 +753,8 @@ This function is supposed to be called from `nntp-server-opened-hook'." (process (condition-case () ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp> - (let ((coding-system-for-read nntp-coding-system-for-read)) + (let ((coding-system-for-read nntp-coding-system-for-read) + (coding-system-for-write nntp-coding-system-for-write)) (funcall nntp-open-connection-function pbuffer)) (error nil) (quit nil)))) |