diff lisp/cedet/semantic/decorate.el @ 104442:b22b44e953cb

cedet/semantic/chart.el: Don't require semantic/find. cedet/semantic/complete.el: Don't require semantic/find. cedet/semantic/decorate.el: Require semantic/tag-file. (semantic-set-tag-folded-isearch): Require semantic/find. cedet/semantic/dep.el: Change semantic--dependency-find-file-on-path into a macro, to avoid compiler warning. Defvar ede-minor-mode and ede-object. Declare ede-system-include-path. cedet/semantic/doc.el: Require semantic/tag-file and semantic/find. cedet/semantic/edit.el: Require semantic/find and semantic/format. cedet/semantic/find.el: Defvar semantic-case-fold. Require semantic. (semantic-find-tags-external-children-of-type): Require semantic/sort. (semantic-find-tags-by-scope-protection-default): Require semantic/tag-ls. cedet/semantic/format.el: Require semantic/tag-ls. eval-when-compile semantic/find. (semantic-format-tag-name): Move up to avoid compiler error. (semantic-format-tag-prototype): Move up to avoid compiler error. (semantic--format-tag-parent-tree): Require semantic/tag-file. (semantic-format-tag-short-doc-default): Require semantic/doc.

--- a/lisp/cedet/semantic/decorate.el	Mon Aug 31 00:45:41 2009 +0000
+++ b/lisp/cedet/semantic/decorate.el	Mon Aug 31 02:16:34 2009 +0000
@@ -29,6 +29,7 @@
 ;;
 
 (require 'semantic)
+(require 'semantic/tag-file)
 (require 'pulse)
 
 ;;; Code:
@@ -304,9 +305,12 @@
 		       'semantic-set-tag-folded-isearch)))
 	  ))
 
+(declare-function semantic-current-tag "semantic/find")
+
 (defun semantic-set-tag-folded-isearch (overlay)
   "Called by isearch if it discovers text in the folded region.
 OVERLAY is passed in by isearch."
+  (require 'semantic/find)
   (semantic-set-tag-folded (semantic-current-tag) nil)
   )