summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKatsumi Yamaoka <yamaoka@jpl.org>2014-07-07 05:47:59 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2014-07-07 05:47:59 +0000
commit4cf00b8c156d96fc05b5447d618c24ecdb14d640 (patch)
tree545d924a6664dfdf7f79b415089176ed486cbfc7 /lisp
parentaeb894a9a06d84d29b93ca04432d7cbed366e665 (diff)
downloademacs-4cf00b8c156d96fc05b5447d618c24ecdb14d640.tar.gz
lisp/gnus/gnus-start.el (gnus-dribble-read-file): Don't stop auto-saving
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/ChangeLog6
-rw-r--r--lisp/gnus/gnus-start.el5
2 files changed, 11 insertions, 0 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7589d1505d7..e3c978331ec 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,9 @@
+2014-07-07 Katsumi Yamaoka <yamaoka@jpl.org>
+
+ * gnus-start.el (gnus-dribble-read-file): Don't stop the auto-saving of
+ the dribble buffer even when it is shrunk a lot.
+ <http://thread.gmane.org/gmane.emacs.gnus.user/16923>
+
2014-06-26 Glenn Morris <rgm@gnu.org>
* mm-util.el (help-function-arglist): Remove outdated declaration.
diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index b79b96e4fc1..766e7c26ac4 100644
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -889,6 +889,11 @@ If REGEXP is given, lines that match it will be deleted."
(setq buffer-save-without-query t)
(erase-buffer)
(setq buffer-file-name dribble-file)
+ ;; The buffer may be shrunk a lot when deleting old entries.
+ ;; It caused the auto-saving to stop.
+ (if (featurep 'emacs)
+ (set (make-local-variable 'auto-save-include-big-deletions) t)
+ (set (make-local-variable 'disable-auto-save-when-buffer-shrinks) nil))
(auto-save-mode t)
(buffer-disable-undo)
(bury-buffer (current-buffer))