[gnus git] branch master updated: m0-11-29-gdfac4f5 =1= gnus-start.el (gnus-dribble-read-file): Don't stop auto-saving

       via  dfac4f57dcc2fbb6a5e347d582ba5270f3721722 (commit)
      from  f1adbda200f7d93d30e339f59081de02ed91b34f (commit)


- Log -----------------------------------------------------------------
commit dfac4f57dcc2fbb6a5e347d582ba5270f3721722
Author: Katsumi Yamaoka <[email protected]>
Date:   Mon Jul 7 05:39:50 2014 +0000

    gnus-start.el (gnus-dribble-read-file): Don't stop auto-saving

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c38f21d..0861557 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2014-07-07  Katsumi Yamaoka  <[email protected]>
+
+	* 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  <[email protected]>
 
 	* mm-util.el (help-function-arglist): Remove outdated declaration.
diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index b79b96e..766e7c2 100644
--- a/lisp/gnus-start.el
+++ b/lisp/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))

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog     |    6 ++++++
 lisp/gnus-start.el |    5 +++++
 2 files changed, 11 insertions(+)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project