From 7ec326db1dfe07523c8e22fb98f8aed6c8f2ae7e Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Sun, 11 Aug 2013 05:09:21 +0200 Subject: [PATCH] lisp/frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil. --- lisp/ChangeLog | 4 ++++ lisp/frameset.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 + + * frameset.el (frameset-valid-p): Fix check; STATES can indeed be nil. + 2013-08-10 Juanma Barranquero * 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 -- 2.11.4.GIT