lisp/cedet/semantic/sort.el (semantic-tag-external-class-default)

(semantic-tag-external-member-children-default): Require
semantic/db-mode instead of checking if semanticdb-minor-mode-p is
bound.

diff --git a/lisp/cedet/semantic/sort.el b/lisp/cedet/semantic/sort.el
index a4448a8415b343e7eb3f68f5d4159722a40ab6eb..d8761b49d43f80f258deafd06361947a0d964ba1 100644 (file)
--- a/lisp/cedet/semantic/sort.el
+++ b/lisp/cedet/semantic/sort.el
@@ -548,7 +548,7 @@ include the default behavior, and merely extend your own."
 Optional argument USEDB specifies if the semantic database is used.
 See `semantic-tag-external-member-children' for details."
   (if (and usedb
-          (fboundp 'semanticdb-minor-mode-p)
+          (require 'semantic/db-mode)
           (semanticdb-minor-mode-p)
           (require 'semantic/db-find))
       (let ((m (semanticdb-find-tags-external-children-of-type
@@ -578,7 +578,7 @@ likely derived, then this function is needed."
 (defun semantic-tag-external-class-default (tag)
   "Return a list of real tags that faux TAG might represent.
 See `semantic-tag-external-class' for details."
-  (if (and (fboundp 'semanticdb-minor-mode-p)
+  (if (and (require 'semantic/db-mode)
           (semanticdb-minor-mode-p))
       (let* ((semanticdb-search-system-databases nil)
             (m (semanticdb-find-tags-by-class