diff options
author | Glenn Morris <rgm@gnu.org> | 2017-04-24 19:51:20 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2017-04-24 19:51:20 -0400 |
commit | 2d0a3feda61186319b7c834ee08c96926dd7ab92 (patch) | |
tree | d57512809db3fd35165b7070a44eecfc98533db7 | |
parent | 53f8f4bf2db097f4a2c68194c55a87c5a1176c8c (diff) | |
download | emacs-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.el | 2 |
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)) |