From 40af3bde4f248866b1a423d21910c9810c7d96be Mon Sep 17 00:00:00 2001 From: Bram Schoenmakers Date: Fri, 14 Oct 2022 16:23:57 +0200 Subject: [PATCH] Fix subsequent previews image-mode marks buffer parts as read-only, essentially disallowing (erase-buffer). --- plantuml-mode.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/plantuml-mode.el b/plantuml-mode.el index 8014a5e..0f0670b 100644 --- a/plantuml-mode.el +++ b/plantuml-mode.el @@ -483,10 +483,10 @@ Put the result into buffer BUF, selecting the window according to PREFIX: (defun plantuml-preview-string (prefix string) "Preview diagram from PlantUML sources (as STRING), using prefix (as PREFIX) to choose where to display it." - (let ((b (get-buffer plantuml-preview-buffer))) - (when b - (with-current-buffer b - (erase-buffer)))) + (when-let ((b (get-buffer plantuml-preview-buffer)) + (inhibit-read-only t)) + (with-current-buffer b + (erase-buffer))) (let* ((imagep (and (display-images-p) (plantuml-is-image-output-p)))