[elpa] master c1e148b 2/2: Merge commit '2bc1a7c5f09de5deb7f27b2b4ed731271f9f3f05'

[Artur Malabarba]

branch: master
commit c1e148b2677435d0992129df4a7aaa60ab0d046b
Merge: 7c20c24 2bc1a7c
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>

    Merge commit '2bc1a7c5f09de5deb7f27b2b4ed731271f9f3f05'
---
 packages/validate/validate.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/packages/validate/validate.el b/packages/validate/validate.el
index f2dcc23..a51cd81 100644
--- a/packages/validate/validate.el
+++ b/packages/validate/validate.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba <address@hidden>
 ;; Keywords: lisp
 ;; Package-Requires: ((emacs "24.1") (cl-lib "0.5") (seq "2.16"))
-;; Version: 1.0.2
+;; Version: 1.0.4
 
 ;;; Commentary:
 ;;
@@ -60,9 +60,10 @@
 
 (defun validate--check-list-contents (values schemas)
   "Check that all VALUES match all SCHEMAS."
-  (if (not (= (length values) (length schemas)))
-      "wrong number of elements"
-    (seq-find #'identity (seq-mapn #'validate--check values schemas))))
+  (when schemas
+    (if (not (= (length values) (length schemas)))
+        "wrong number of elements"
+      (seq-find #'identity (seq-mapn #'validate--check values schemas)))))
 
 (defun validate--indent-by-2 (x)
   (replace-regexp-in-string "^" "  " x))