diff lisp/simple.el @ 762:852a2f5838da

*** empty log message ***

--- a/lisp/simple.el	Mon Jul 13 18:33:54 1992 +0000
+++ b/lisp/simple.el	Mon Jul 13 18:39:10 1992 +0000
@@ -829,7 +829,7 @@
 	     (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.