From 2c69236b3c1daa8fcadc4b798bc8422e59245690 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 30 Mar 2017 10:44:35 -0400 Subject: [PATCH] * lisp/cedet/semantic/wisent/wisent.el (wisent-automaton-p): Use obarrayp. --- lisp/cedet/semantic/wisent/wisent.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/cedet/semantic/wisent/wisent.el b/lisp/cedet/semantic/wisent/wisent.el index 36dff019792..08cad524aed 100644 --- a/lisp/cedet/semantic/wisent/wisent.el +++ b/lisp/cedet/semantic/wisent/wisent.el @@ -114,7 +114,7 @@ If OBJ is a symbol check its value." (and (vectorp obj) (= 4 (length obj)) (vectorp (aref obj 0)) (vectorp (aref obj 1)) (= (length (aref obj 0)) (length (aref obj 1))) - (listp (aref obj 2)) (vectorp (aref obj 3)))) + (listp (aref obj 2)) (obarrayp (aref obj 3)))) (defsubst wisent-region (&rest positions) "Return the start/end positions of the region including POSITIONS. -- 2.39.5