diff options
| author | Eric Abrahamsen | 2017-09-29 13:58:04 -0700 |
|---|---|---|
| committer | Eric Abrahamsen | 2017-10-21 19:22:22 -0700 |
| commit | 73dda4e0b45a1f831d5f990fb29e958a76ccc518 (patch) | |
| tree | c72e3ffe7fd751597727059be2c7cfe66f33d846 /lisp/gnus/nnheader.el | |
| parent | 92045f4546b9708dc9f69954799d211c1f56ff1e (diff) | |
| download | emacs-scratch/gnus-docs.tar.gz emacs-scratch/gnus-docs.zip | |
Add more comments and docstrings to Gnus source filesscratch/gnus-docs
Diffstat (limited to 'lisp/gnus/nnheader.el')
| -rw-r--r-- | lisp/gnus/nnheader.el | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el index 0ea99d53a4a..036945fed06 100644 --- a/lisp/gnus/nnheader.el +++ b/lisp/gnus/nnheader.el | |||
| @@ -24,6 +24,19 @@ | |||
| 24 | 24 | ||
| 25 | ;;; Commentary: | 25 | ;;; Commentary: |
| 26 | 26 | ||
| 27 | ;; This file implements communication with the (slightly-misnamed) | ||
| 28 | ;; `nntp-server-buffer'. When Gnus sends requests to the backends, | ||
| 29 | ;; they insert their responses into this buffer, and the various | ||
| 30 | ;; `nnheader-*' functions read and parse those responses. The | ||
| 31 | ;; responses might be control strings like "211 OK", and they might be | ||
| 32 | ;; full article headers and bodies. Some backend's server responses | ||
| 33 | ;; are only interpretable by that backend; they still use this buffer | ||
| 34 | ;; to insert server responses, but then read (and remove) those | ||
| 35 | ;; responses themselves. | ||
| 36 | |||
| 37 | ;; Failure to clear this buffer, or to set point correctly, is an easy | ||
| 38 | ;; Gnus bug. | ||
| 39 | |||
| 27 | ;;; Code: | 40 | ;;; Code: |
| 28 | 41 | ||
| 29 | (eval-when-compile (require 'cl)) | 42 | (eval-when-compile (require 'cl)) |
| @@ -564,7 +577,10 @@ the line could be found." | |||
| 564 | 577 | ||
| 565 | ;; Various cruft the backends and Gnus need to communicate. | 578 | ;; Various cruft the backends and Gnus need to communicate. |
| 566 | 579 | ||
| 567 | (defvar nntp-server-buffer nil) | 580 | (defvar nntp-server-buffer nil |
| 581 | "Buffer used for communication with server backends. | ||
| 582 | When Gnus sends a request to the various servers, they insert | ||
| 583 | their responses into this buffer.") | ||
| 568 | (defvar nntp-process-response nil) | 584 | (defvar nntp-process-response nil) |
| 569 | 585 | ||
| 570 | (defvar nnheader-callback-function nil) | 586 | (defvar nnheader-callback-function nil) |