[elpa] master a3abf3f 021/281: counsel.el (counsel-set-variable): Handle defcustom with multiple entries

[Oleh Krehel]

branch: master
commit a3abf3ffd670776da591ae9e5e2d7011b6d6a190
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    counsel.el (counsel-set-variable): Handle defcustom with multiple entries
    
    Fixes #960
---
 counsel.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/counsel.el b/counsel.el
index 6f74fbc..7532c4e 100644
--- a/counsel.el
+++ b/counsel.el
@@ -568,7 +568,9 @@ input corresponding to the chosen variable."
                   (if (assoc res cands)
                       (cdr (assoc res cands))
                     (read res)))
-            (eval `(setq ,sym ,res))))
+            (set sym (if (and (listp res) (eq (car res) 'quote))
+                         (cadr res)
+                       res))))
       (unless (boundp sym)
         (set sym nil))
       (counsel-read-setq-expression sym))))