diff options
| author | Richard M. Stallman | 1998-08-13 06:20:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-08-13 06:20:33 +0000 |
| commit | 45926d06f4a1ea6885a08b49417b161f584be8ee (patch) | |
| tree | 78cd8ebefa67937865e88dc74f2825b69cda1176 | |
| parent | 06cab6db58bbb70007257887df23097e14f2706e (diff) | |
| download | emacs-45926d06f4a1ea6885a08b49417b161f584be8ee.tar.gz emacs-45926d06f4a1ea6885a08b49417b161f584be8ee.zip | |
(nntp-encode-text): Properly encode outgoing text by
putting CR at the end of all lines.
| -rw-r--r-- | lisp/gnus/nntp.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el index eeb93748af3..4067d566eb6 100644 --- a/lisp/gnus/nntp.el +++ b/lisp/gnus/nntp.el | |||
| @@ -906,7 +906,12 @@ This function is supposed to be called from `nntp-server-opened-hook'." | |||
| 906 | (insert "\n")) | 906 | (insert "\n")) |
| 907 | ;; Insert `.' at end of buffer (end of text mark). | 907 | ;; Insert `.' at end of buffer (end of text mark). |
| 908 | (goto-char (point-max)) | 908 | (goto-char (point-max)) |
| 909 | (insert "." nntp-end-of-line))) | 909 | (insert ".\n") |
| 910 | (goto-char (point-min)) | ||
| 911 | (while (not (eobp)) | ||
| 912 | (end-of-line) | ||
| 913 | (delete-char 1) | ||
| 914 | (insert nntp-end-of-line)))) | ||
| 910 | 915 | ||
| 911 | (defun nntp-retrieve-headers-with-xover (articles &optional fetch-old) | 916 | (defun nntp-retrieve-headers-with-xover (articles &optional fetch-old) |
| 912 | (set-buffer nntp-server-buffer) | 917 | (set-buffer nntp-server-buffer) |