summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2017-04-24 19:51:20 -0400
committerGlenn Morris <rgm@gnu.org>2017-04-24 19:51:20 -0400
commit2d0a3feda61186319b7c834ee08c96926dd7ab92 (patch)
treed57512809db3fd35165b7070a44eecfc98533db7
parent53f8f4bf2db097f4a2c68194c55a87c5a1176c8c (diff)
downloademacs-2d0a3feda61186319b7c834ee08c96926dd7ab92.tar.gz
Further robustify cedet bootstrap to loaddefs not yet built
* lisp/cedet/semantic/util.el (semantic-something-to-tag-table): Avoid void-function error when bootstrapping and semantic/loaddefs.el does not yet exist.
-rw-r--r--lisp/cedet/semantic/util.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/cedet/semantic/util.el b/lisp/cedet/semantic/util.el
index f8f12ec56a5..31562bc16ab 100644
--- a/lisp/cedet/semantic/util.el
+++ b/lisp/cedet/semantic/util.el
@@ -110,12 +110,14 @@ buffer, or a filename. If SOMETHING is nil return nil."
(semantic-file-tag-table something))
;; A Semanticdb table
((and (featurep 'semantic/db)
+ (require 'semantic/db-mode)
(semanticdb-minor-mode-p)
(semanticdb-abstract-table-child-p something))
(semanticdb-refresh-table something)
(semanticdb-get-tags something))
;; Semanticdb find-results
((and (featurep 'semantic/db)
+ (require 'semantic/db-mode)
(semanticdb-minor-mode-p)
(require 'semantic/db-find)
(semanticdb-find-results-p something))