lisp/frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ed1aa7c18f0..ac360a3e422 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-08-11  Juanma Barranquero  <lekktu@gmail.com>
+
+        * frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil.
+
 2013-08-10  Juanma Barranquero  <lekktu@gmail.com>
 
         * tutorial.el (tutorial--describe-nonstandard-key): Use string-match-p.
diff --git a/lisp/frameset.el b/lisp/frameset.el
index 132cbcd4856..a347599bb51 100644
--- a/lisp/frameset.el
+++ b/lisp/frameset.el
@@ -156,7 +156,7 @@ a valid one, and the frameset version if it is valid."
        (stringp (or (aref object 4) ""))  ; NAME is a string or nil
        (stringp (or (aref object 5) ""))  ; DESCRIPTION is a string or nil
        (listp (aref object 6))            ; PROPERTIES is a list
-       (consp (aref object 7))            ; and STATES is non-nil
+       (listp (aref object 7))            ; and STATES is, too
        (cl-every #'consp (aref object 7)) ; and an alist
        (aref object 1)))                  ; return VERSION