From 65235b0a3834e833d45e72bdcddf20fd0e868938 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 24 Nov 2009 02:38:08 +0000 Subject: [PATCH] (global-semantic-idle-scheduler-mode): Move after definition of global-semantic-idle-tag-highlight-mode. --- lisp/ChangeLog | 3 +++ lisp/cedet/semantic/idle.el | 38 ++++++++++++++++++++------------------ 2 files changed, 23 insertions(+), 18 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c051c1e1a66..212ab1f1846 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,9 @@ * bookmark.el (bookmark-bmenu-hide-filenames): Remove assignment to deleted variable bookmark-bmenu-bookmark-column. + * cedet/semantic/idle.el (global-semantic-idle-scheduler-mode): + Move after definition of global-semantic-idle-tag-highlight-mode. + 2009-11-24 Stefan Monnier * bookmark.el (bookmark-bmenu-search): Clear echo area when exiting. diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el index ca5a00a79f5..acb2a737bda 100644 --- a/lisp/cedet/semantic/idle.el +++ b/lisp/cedet/semantic/idle.el @@ -139,24 +139,6 @@ unlikely the user would be ready to type again right away." :set (lambda (sym val) (global-semantic-idle-scheduler-mode (if val 1 -1)))) -;;;###autoload -(defun global-semantic-idle-scheduler-mode (&optional arg) - "Toggle global use of option `semantic-idle-scheduler-mode'. -The idle scheduler with automatically reparse buffers in idle time, -and then schedule other jobs setup with `semantic-idle-scheduler-add'. -If ARG is positive, enable, if it is negative, disable. -If ARG is nil, then toggle." - (interactive "P") - ;; When turning off, disable other idle modes. - (when (or (and (numberp arg) (< arg 0)) - (and (null arg) global-semantic-idle-scheduler-mode)) - (global-semantic-idle-summary-mode -1) - (global-semantic-idle-tag-highlight-mode -1) - (global-semantic-idle-completions-mode -1)) - (setq global-semantic-idle-scheduler-mode - (semantic-toggle-minor-mode-globally - 'semantic-idle-scheduler-mode arg))) - (defcustom semantic-idle-scheduler-mode-hook nil "Hook run at the end of the function `semantic-idle-scheduler-mode'." :group 'semantic @@ -589,6 +571,7 @@ Does nothing if the current buffer doesn't need reparsing." ;; needed to create the minor mode that will enable or disable ;; a services. The services must provide a single function. +;; FIXME doc is incomplete. (defmacro define-semantic-idle-service (name doc &rest forms) "Create a new idle services with NAME. DOC will be a documentation string describing FORMS. @@ -973,6 +956,25 @@ Call `semantic-symref-hits-in-region' to identify local references." )))) +;;;###autoload +(defun global-semantic-idle-scheduler-mode (&optional arg) + "Toggle global use of option `semantic-idle-scheduler-mode'. +The idle scheduler with automatically reparse buffers in idle time, +and then schedule other jobs setup with `semantic-idle-scheduler-add'. +If ARG is positive, enable, if it is negative, disable. +If ARG is nil, then toggle." + (interactive "P") + ;; When turning off, disable other idle modes. + (when (or (and (numberp arg) (< arg 0)) + (and (null arg) global-semantic-idle-scheduler-mode)) + (global-semantic-idle-summary-mode -1) + (global-semantic-idle-tag-highlight-mode -1) + (global-semantic-idle-completions-mode -1)) + (setq global-semantic-idle-scheduler-mode + (semantic-toggle-minor-mode-globally + 'semantic-idle-scheduler-mode arg))) + + ;;; Completion Popup Mode ;; ;; This mode uses tooltips to display a (hopefully) short list of possible -- 2.11.4.GIT