[Emacs-diffs] trunk r113795: lisp/frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil.

[Juanma Barranquero]

------------------------------------------------------------
revno: 113795
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sun 2013-08-11 05:09:21 +0200
message:
  lisp/frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/frameset.el               frameset.el-20130802043218-tfwraxv1c2zlibpw-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-08-11 00:07:48 +0000
+++ b/lisp/ChangeLog    2013-08-11 03:09:21 +0000
@@ -1,3 +1,7 @@
+2013-08-11  Juanma Barranquero  <address@hidden>
+
+       * frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil.
+
 2013-08-10  Juanma Barranquero  <address@hidden>
 
        * tutorial.el (tutorial--describe-nonstandard-key): Use string-match-p.

=== modified file 'lisp/frameset.el'
--- a/lisp/frameset.el  2013-08-09 00:30:24 +0000
+++ b/lisp/frameset.el  2013-08-11 03:09:21 +0000
@@ -156,7 +156,7 @@
        (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