diff options
| author | Lars Ingebrigtsen | 2019-06-13 16:57:50 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-06-13 16:57:50 +0200 |
| commit | 37d827152f3744cb2f203c96ac6c9bb650b0313c (patch) | |
| tree | 5783c172bd2eace2a2f2d0416f8e81440fba66b9 | |
| parent | 5b8fa272792d8072f51ff048646022fde1db73f4 (diff) | |
| download | emacs-37d827152f3744cb2f203c96ac6c9bb650b0313c.tar.gz emacs-37d827152f3744cb2f203c96ac6c9bb650b0313c.zip | |
semantic/idle.el compilation warning fix
* lisp/cedet/semantic/idle.el (semantic/analyze): Require to
avoid compilation warnings about unknown slots, and remove
declare-function.
| -rw-r--r-- | lisp/cedet/semantic/idle.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el index a8946301da5..92ec7f882ae 100644 --- a/lisp/cedet/semantic/idle.el +++ b/lisp/cedet/semantic/idle.el | |||
| @@ -40,6 +40,7 @@ | |||
| 40 | (require 'semantic/ctxt) | 40 | (require 'semantic/ctxt) |
| 41 | (require 'semantic/format) | 41 | (require 'semantic/format) |
| 42 | (require 'semantic/tag) | 42 | (require 'semantic/tag) |
| 43 | (require 'semantic/analyze) | ||
| 43 | (require 'timer) | 44 | (require 'timer) |
| 44 | ;;(require 'working) | 45 | ;;(require 'working) |
| 45 | 46 | ||
| @@ -48,7 +49,6 @@ | |||
| 48 | 49 | ||
| 49 | (defvar eldoc-last-message) | 50 | (defvar eldoc-last-message) |
| 50 | (declare-function eldoc-message "eldoc") | 51 | (declare-function eldoc-message "eldoc") |
| 51 | (declare-function semantic-analyze-interesting-tag "semantic/analyze") | ||
| 52 | (declare-function semantic-analyze-unsplit-name "semantic/analyze/fcn") | 52 | (declare-function semantic-analyze-unsplit-name "semantic/analyze/fcn") |
| 53 | (declare-function semantic-complete-analyze-inline-idle "semantic/complete") | 53 | (declare-function semantic-complete-analyze-inline-idle "semantic/complete") |
| 54 | (declare-function semanticdb-deep-find-tags-by-name "semantic/db-find") | 54 | (declare-function semanticdb-deep-find-tags-by-name "semantic/db-find") |
| @@ -682,7 +682,6 @@ Use the semantic analyzer to find the symbol information." | |||
| 682 | (semantic-analyze-current-context (point)) | 682 | (semantic-analyze-current-context (point)) |
| 683 | (error nil)))) | 683 | (error nil)))) |
| 684 | (when analysis | 684 | (when analysis |
| 685 | (require 'semantic/analyze) | ||
| 686 | (semantic-analyze-interesting-tag analysis)))) | 685 | (semantic-analyze-interesting-tag analysis)))) |
| 687 | 686 | ||
| 688 | (defun semantic-idle-summary-current-symbol-info-default () | 687 | (defun semantic-idle-summary-current-symbol-info-default () |