(all): Add `undo-outer-limit'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6eaff11c58005424305f0e1b3ecd78489cf2bb42..b5247f7cbfe00de45b8e0c4105bf45b7184bcd74 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-01-26  Luc Teirlinck  <teirllm@auburn.edu>
+
+       * cus-start.el (all): Add `undo-outer-limit'.
+
 2005-01-25  Roland Winkler  <Roland.Winkler@physik.uni-erlangen.de>
 
        * textmodes/bibtex.el (bibtex-format-entry): Use

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 12ffd93fefd3ce4a8579a700b9ffb4d478ba4acd..fc293734495821d56821569d9b92824472aab772 100644 (file)
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -41,6 +41,17 @@
             (gc-cons-threshold alloc integer)
             (undo-limit undo integer)
             (undo-strong-limit undo integer)
+            (undo-outer-limit undo
+                              (choice integer
+                                      (const :tag "No limit"
+                                             :format "%t\n%d"
+                                             :doc
+                                             "With this choice, \
+the undo info for the current command never gets discarded.
+This should only be chosen under exceptional circumstances,
+since it could result in memory overflow and make Emacs crash."
+                                             nil))
+                              "21.4")
             (garbage-collection-messages alloc boolean)
             ;; buffer.c
             (mode-line-format modeline sexp) ;Hard to do right.