*** empty log message ***

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/simple.el b/lisp/simple.el
index 3989a3685a2..1cc5f43df0f 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -829,7 +829,7 @@ to make one entry in the kill ring."
 	     (eq last-command 'kill-region)
 	     (eq beg end)))
     ;; Don't let the undo list be truncated before we can even access it.
-    (let ((undo-high-threshold (+ (- (max beg end) (min beg end)) 100)))
+    (let ((undo-strong-limit (+ (- (max beg end) (min beg end)) 100)))
       (delete-region beg end)
       ;; Take the same string recorded for undo
       ;; and put it in the kill-ring.