branch: master
commit 3787f8eac611703f8d20ca6a38e0bceb76aa6259
Author: Artur Malabarba <bruce.connor...@gmail.com>
Commit: Artur Malabarba <bruce.connor...@gmail.com>

    Fix #2 - Use equal instead of eq to validate :const
---
 validate.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/validate.el b/validate.el
index 7ca4b0a..0082d8d 100644
--- a/validate.el
+++ b/validate.el
@@ -96,7 +96,7 @@ If they don't match, return an explanation."
                         ((wtype 'list))
                         (t (let ((subschema (car args)))
                              (seq-some (lambda (v) (validate--check v 
subschema)) value)))))
-               ((const function-item variable-item) (unless (eq value (car 
args))
+               ((const function-item variable-item) (unless (equal value (car 
args))
                                                       "not the expected 
value"))
                (file (cond ((wtype 'string))
                            ((file-exists-p value) nil)

Reply via email to