Remove writing of headers into Gnus' cache files

* lisp/gnus/gnus-cache.el (gnus-cache-retrieve-headers): This function
should not be responsible for caching new headers, only returning
existing ones.

diff --git a/lisp/gnus/gnus-cache.el b/lisp/gnus/gnus-cache.el
index d46eb39ace3f55709c2ca6d8e210b451b8d9e7f8..9423d9f2f6b62bd4b7df69ad8ffc085a2230134c 100644 (file)
--- a/lisp/gnus/gnus-cache.el
+++ b/lisp/gnus/gnus-cache.el
@@ -312,11 +312,7 @@ it's not cached."
          (when uncached-articles
            (setq headers (and articles
                               (gnus-fetch-headers uncached-articles)))))
-       (when (and headers gnus-cache-buffer)
-         (with-current-buffer (cdr gnus-cache-buffer)
-           (goto-char (point-min))
-           (mapc #'nnheader-insert-nov headers)
-           (gnus-cache-save-buffers)))
+       (gnus-cache-save-buffers)
        ;; Then we include the cached headers.
        (when (file-exists-p cache-file)
          (setq headers