branch: externals/futur
commit 488f21275794025117ab5365d0684d930482c5cd
Author: Stefan Monnier <[email protected]>
Commit: Stefan Monnier <[email protected]>

    futur-server.el (futur--print-stdout): Catch print errors.
---
 futur-server.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/futur-server.el b/futur-server.el
index d709e5830a..719a1b6a5d 100644
--- a/futur-server.el
+++ b/futur-server.el
@@ -56,7 +56,9 @@
         ;; as well print them bare.
         (print-symbols-bare t))
     (princ sid t)
-    (prin1 sexp t)
+    (condition-case err
+        (prin1 sexp t)
+      (t (prin1 `(:print-error . ,err) t)))
     (princ futur--elisp-impossible-string t)
     (terpri t)))
 

Reply via email to