From: Eshel Yaron <me@eshelyaron.com>
Date: Mon, 15 Apr 2024 08:57:56 +0000 (+0200)
Subject: ; (pp-display-expression): Enable undo in output buffer
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2be73ce0eb8e2d6bf52597250291e1518b11b84a;p=emacs.git

; (pp-display-expression): Enable undo in output buffer

* lisp/emacs-lisp/pp.el (pp-display-expression): Enable undo.
---

diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el
index d586fc59939..33b583a8ffa 100644
--- a/lisp/emacs-lisp/pp.el
+++ b/lisp/emacs-lisp/pp.el
@@ -358,6 +358,7 @@ after OUT-BUFFER-NAME."
       (with-current-buffer standard-output
 	(emacs-lisp-mode)
 	(setq buffer-read-only nil)
+	(setq buffer-undo-list nil)
         (setq-local font-lock-verbose nil)))))
 
 (defun pp-insert-short-sexp (sexp &optional width)