# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1252341275 0
# Node ID 1da44e87bf9017db34110a401c8941d973d3617f
# Parent  9787b67f48d7b4e35f6d0d47427279521b975fe6
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 -r 9787b67f48d7 -r 1da44e87bf90 lisp/cedet/semantic/sort.el
--- a/lisp/cedet/semantic/sort.el	Mon Sep 07 16:33:20 2009 +0000
+++ b/lisp/cedet/semantic/sort.el	Mon Sep 07 16:34:35 2009 +0000
@@ -548,7 +548,7 @@
 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 @@
 (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