[elpa] externals/preview-auto 7d7207a4dd 14/36: fix bug involving editing region updates

[ELPA Syncer]

branch: externals/preview-auto
commit 7d7207a4ddb30baeec52cadc96047ab72bee7a9e
Author: Paul Nelson <ultrono@gmail.com>
Commit: Paul Nelson <ultrono@gmail.com>

    fix bug involving editing region updates
---
 preview-auto.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/preview-auto.el b/preview-auto.el
index 45145fe6db..09f72f59ec 100644
--- a/preview-auto.el
+++ b/preview-auto.el
@@ -334,8 +334,9 @@ Imperfection: still causes current message to disappear."
   (let ((TeX-suppress-compilation-message t)
         (save-silently t))
     (advice-add 'write-region :around #'preview-auto--silent-write-region)
-    (preview-region beg end)
-    (advice-remove 'write-region #'preview-auto--silent-write-region)))
+    (prog1
+        (preview-region beg end)
+      (advice-remove 'write-region #'preview-auto--silent-write-region))))
 
 (defun preview-auto--update-editing-region ()
   "Update preview of environment being edited."