From 1373a94ab4b1c82b3ab380d0b00edb0e922b404b Mon Sep 17 00:00:00 2001 From: Eric Ludlam Date: Wed, 15 Oct 2014 22:06:04 -0400 Subject: [PATCH] (cit-gnu-externaldb-test-one): Improve test for bad search result. --- test/manual/cedet/cit-externaldb.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/test/manual/cedet/cit-externaldb.el b/test/manual/cedet/cit-externaldb.el index b72ac777ad2..34dfd45234c 100644 --- a/test/manual/cedet/cit-externaldb.el +++ b/test/manual/cedet/cit-externaldb.el @@ -150,7 +150,8 @@ ;; There is only one database result because we never enabled ;; semanticdb minor mode. - (if (not (object-of-class-p (car (car res)) semanticdbclass)) + (if (or (not res) + (not (object-of-class-p (car (car res)) semanticdbclass))) (error "Did not find %s results table." symrefsym)) (when (/= (semanticdb-find-result-length res) 1) -- 2.39.5