[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
girzel/gnus-headers 84e8037 1/2: Remove writing of headers into Gnus' ca
From: |
Eric Abrahamsen |
Subject: |
girzel/gnus-headers 84e8037 1/2: Remove writing of headers into Gnus' cache files |
Date: |
Sat, 16 Jan 2021 21:40:34 -0500 (EST) |
branch: girzel/gnus-headers
commit 84e80376424b7da9731ac3a2d0223833544fb63b
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>
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.
---
lisp/gnus/gnus-cache.el | 6 +-----
1 file changed, 1 insertion(+), 5 deletions(-)
diff --git a/lisp/gnus/gnus-cache.el b/lisp/gnus/gnus-cache.el
index d46eb39..9423d9f 100644
--- 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