diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2009-09-26 17:47:11 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2009-09-26 17:47:11 +0000 |
commit | 29e1a603c0d7fa1e4e2c116cbaab90d0401f898b (patch) | |
tree | ac94b65e2de818951c17cd1cb77d03e32418f158 /lisp/cedet/semantic/util-modes.el | |
parent | 17e1f4bc65ff059a6f05068dc2d64d7130719fd7 (diff) | |
download | emacs-29e1a603c0d7fa1e4e2c116cbaab90d0401f898b.tar.gz |
* cedet/semantic/lex.el (semantic-lex-reset-hooks): Doc fix.
* cedet/semantic/idle.el
(semantic-before-idle-scheduler-reparse-hook)
(semantic-after-idle-scheduler-reparse-hook): Rename from *-hooks.
Make old name an obsolete alias.
* cedet/semantic/edit.el (semantic-after-partial-cache-change-hook)
(semantic-change-hooks, semantic-edits-new-change-hooks)
(semantic-edits-delete-change-hooks)
(semantic-edits-move-change-hook)
(semantic-edits-reparse-change-hooks)
(semantic-edits-incremental-reparse-failed-hooks): Doc fixes.
* cedet/semantic/debug.el (semantic-debug-mode): Rename hook
symbols.
* cedet/semantic/db-mode.el (semanticdb-mode-hook): Rename from
semanticdb-mode-hooks.
(global-semanticdb-minor-mode): Use the new name.
(semanticdb-hooks): Use semantic-init-db-hook instead of obsolete
alias semantic-init-db-hooks.
* cedet/semantic/db-global.el (semanticdb-enable-gnu-global-databases):
Use semantic-init-hook instead of obsolete alias
semantic-init-hooks.
* cedet/semantic/db-file.el (semanticdb-save-database-hook):
Rename from semanticdb-save-database-hooks. Make old name an
obsolete alias.
* cedet/semantic/decorate/mode.el
(semantic-decorate-pending-decoration-hook): Rename from
semantic-decorate-pending-decoration-hooks. Make old name an
obsolete alias.
* cedet/srecode/map.el (srecode-map-validate-file-for-mode): Use
semantic-init-hook instead of obsolete alias semantic-init-hooks.
* cedet/semantic/fw.el (semantic-find-file-noselect): Use
semantic-init-hook instead of obsolete alias semantic-init-hooks.
* cedet/ede/project-am.el (project-am-with-makefile-current): Use
semantic-init-hook instead of obsolete alias semantic-init-hooks.
* cedet/semantic/util.el (semantic-describe-buffer): Use
semantic-init-hook and semantic-init-db-hook instead of obsolete
aliases.
* cedet/semantic/util-modes.el (semantic-mode-line-update)
(semantic-toggle-minor-mode-globally): Use semantic-init-hook
instead of obsolete alias semantic-init-hooks.
Synch to Eric M. Ludlam's upstream CEDET repository:
* cedet/semantic/bovine/c.el (semantic-c-parse-token-hack-depth):
New var.
(semantic-c-parse-lexical-token): Save match data when setting up
the secondary parse buffer. Allow recursion. Protect against
initializing the major mode from throwing errors, ie user hooks.
* cedet/semantic/lex-spp.el (semantic-lex-spp-lex-text-string):
Protect installing a major mode from throwing errors.
Diffstat (limited to 'lisp/cedet/semantic/util-modes.el')
-rw-r--r-- | lisp/cedet/semantic/util-modes.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/cedet/semantic/util-modes.el b/lisp/cedet/semantic/util-modes.el index 4df7e68d338..b0d08210c29 100644 --- a/lisp/cedet/semantic/util-modes.el +++ b/lisp/cedet/semantic/util-modes.el @@ -97,7 +97,7 @@ Only minor modes that are locally enabled are shown in the mode line." ml (cdr ml)) (when (and (symbol-value mm) ;; Only show local minor mode status - (not (memq mm semantic-init-hooks))) + (not (memq mm semantic-init-hook))) (and ms (symbolp ms) (setq ms (symbol-value ms))) @@ -178,26 +178,26 @@ function used to toggle the mode." (or (and (fboundp mode) (assq mode minor-mode-alist)) (error "Semantic minor mode %s not found" mode)) (if (not arg) - (if (memq mode semantic-init-hooks) + (if (memq mode semantic-init-hook) (setq arg -1) (setq arg 1))) ;; Add or remove the MODE toggle function from - ;; `semantic-init-hooks'. Then turn MODE on or off in every + ;; `semantic-init-hook'. Then turn MODE on or off in every ;; Semantic enabled buffer. (cond ;; Turn off if ARG < 0 ((< arg 0) - (remove-hook 'semantic-init-hooks mode) + (remove-hook 'semantic-init-hook mode) (semantic-map-buffers #'(lambda () (funcall mode -1))) nil) ;; Turn on if ARG > 0 ((> arg 0) - (add-hook 'semantic-init-hooks mode) + (add-hook 'semantic-init-hook mode) (semantic-map-buffers #'(lambda () (funcall mode 1))) t) ;; Otherwise just check MODE state (t - (memq mode semantic-init-hooks)) + (memq mode semantic-init-hook)) )) ;;;; |