diff options
| author | Richard M. Stallman | 1994-01-11 15:56:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-01-11 15:56:29 +0000 |
| commit | e917fa0784c9fdf6cb024a67be72ea1b9657522e (patch) | |
| tree | a96a1c5dac075cc1bafd3d08225ee9f87929b57e | |
| parent | 5f96776a9747052106b034045f5632d802ae4e77 (diff) | |
| download | emacs-e917fa0784c9fdf6cb024a67be72ea1b9657522e.tar.gz emacs-e917fa0784c9fdf6cb024a67be72ea1b9657522e.zip | |
(open-line): Treat all cases of enabled undo alike.
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 8eb0ace9d46..46fed18c818 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -41,7 +41,7 @@ With arg N, insert N newlines." | |||
| 41 | ;; If undo is enabled, don't let this hack be visible: | 41 | ;; If undo is enabled, don't let this hack be visible: |
| 42 | ;; record the real value of point as the place to move back to | 42 | ;; record the real value of point as the place to move back to |
| 43 | ;; if we undo this insert. | 43 | ;; if we undo this insert. |
| 44 | (if (and buffer-undo-list (not (eq buffer-undo-list t))) | 44 | (if (not (eq buffer-undo-list t)) |
| 45 | (setq buffer-undo-list (cons (point) buffer-undo-list))) | 45 | (setq buffer-undo-list (cons (point) buffer-undo-list))) |
| 46 | (forward-char -1))) | 46 | (forward-char -1))) |
| 47 | (save-excursion | 47 | (save-excursion |