lang/emacs-lisp: recreate output popup on eval

If we don't, the popup doesn't resize itself if the contents shrink or
grow.
This commit is contained in:
Henrik Lissner 2019-10-22 00:34:16 -04:00
parent cba645be00
commit e31f51e0ba
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395

View File

@ -16,6 +16,8 @@ to a pop up buffer."
'+word-wrap-mode '+word-wrap-mode
'visual-line-mode) 'visual-line-mode)
temp-buffer-show-hook))) temp-buffer-show-hook)))
(when-let (buffer (get-buffer "*Pp Eval Output*"))
(kill-buffer buffer))
(pp-eval-expression (pp-eval-expression
(read (buffer-substring-no-properties beg end))))) (read (buffer-substring-no-properties beg end)))))