From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 13 Jun 2019 14:58:58 +0000 (+0200)
Subject: semantic/senator.el byte compilation fix
X-Git-Tag: emacs-27.0.90~2557
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7bee5072f99a173ee24d5f82d671ec2fa1be5971;p=emacs.git

semantic/senator.el byte compilation fix

* lisp/cedet/semantic/senator.el (semantic/analyze): Require to
avoid compilation warnings about unknown slots, and remove
declare-function.
---

diff --git a/lisp/cedet/semantic/senator.el b/lisp/cedet/semantic/senator.el
index 2462662bbd8..2d858dd9851 100644
--- a/lisp/cedet/semantic/senator.el
+++ b/lisp/cedet/semantic/senator.el
@@ -36,6 +36,7 @@
 (require 'semantic/ctxt)
 (require 'semantic/decorate)
 (require 'semantic/format)
+(require 'semantic/analyze)
 
 (eval-when-compile (require 'semantic/find))
 
@@ -43,7 +44,6 @@
 
 (declare-function semantic-analyze-tag-references "semantic/analyze/refs")
 (declare-function semantic-analyze-refs-impl "semantic/analyze/refs")
-(declare-function semantic-analyze-find-tag "semantic/analyze")
 (declare-function semantic-analyze-tag-type "semantic/analyze/fcn")
 (declare-function semantic-tag-external-class "semantic/sort")
 (declare-function imenu--mouse-menu "imenu")
@@ -594,7 +594,6 @@ Makes C/C++ language like assumptions."
 
 	;; Get the data type, and try to find that.
         ((semantic-tag-type tag)
-	 (require 'semantic/analyze)
 	 (let ((scope (semantic-calculate-scope (point))))
 	   (semantic-analyze-tag-type tag scope))
 	 )