[elpa] externals/embark 514b130 4/4: Merge pull request #410 from minad/fix-var-export

[ELPA Syncer]

branch: externals/embark
commit 514b1308e97e322c89e691d1022b29586c72de14
Merge: b4a9d0e 5eda761
Author: Omar Antolín Camarena <omar.antolin@gmail.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #410 from minad/fix-var-export
    
    embark-export-customize-variable: Check if the variable can be properly 
deserialized
---
 embark.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/embark.el b/embark.el
index b90a0c3..03c8495 100644
--- a/embark.el
+++ b/embark.el
@@ -2904,7 +2904,16 @@ PRED is a predicate function used to filter the items."
 
 (defun embark-export-customize-variable (variables)
   "Create a customization buffer listing VARIABLES."
-  (embark--export-customize variables "Variables" 'custom-variable #'boundp))
+  (embark--export-customize
+   variables "Variables" 'custom-variable
+   (lambda (sym)
+     (and (boundp sym)
+          (condition-case nil
+              ;; Check if variable can be properly deserialized.
+              ;; The customization widget relies on this.
+              (let ((val (symbol-value sym)))
+                (or (read (format "%S" val)) t))
+            (t nil))))))
 
 (defun embark-export-ibuffer (buffers)
   "Create an ibuffer buffer listing BUFFERS."