diff options
Diffstat (limited to 'lisp/cedet/semantic')
| -rw-r--r-- | lisp/cedet/semantic/ctxt.el | 1 | ||||
| -rw-r--r-- | lisp/cedet/semantic/decorate/mode.el | 7 | ||||
| -rw-r--r-- | lisp/cedet/semantic/idle.el | 2 |
3 files changed, 4 insertions, 6 deletions
diff --git a/lisp/cedet/semantic/ctxt.el b/lisp/cedet/semantic/ctxt.el index 629bbdee561..b010a30da7f 100644 --- a/lisp/cedet/semantic/ctxt.el +++ b/lisp/cedet/semantic/ctxt.el @@ -397,7 +397,6 @@ work on C like languages." t) (error nil)) (looking-at fieldsep1))) - (setq symlist (list "")) (forward-sexp -1) ;; Skip array expressions. (while (looking-at "\\s(") (forward-sexp -1)) diff --git a/lisp/cedet/semantic/decorate/mode.el b/lisp/cedet/semantic/decorate/mode.el index a4aa535eb1a..ba06c73936b 100644 --- a/lisp/cedet/semantic/decorate/mode.el +++ b/lisp/cedet/semantic/decorate/mode.el @@ -374,7 +374,7 @@ IGNORE any input arguments." "Define a new decoration style with NAME. DOC is a documentation string describing the decoration style NAME. It is appended to auto-generated doc strings. -An Optional list of FLAGS can also be specified. Flags are: +An optional list of FLAGS can also be specified. Flags are: :enabled <value> - specify the default enabled value for NAME. :load <value> - specify a feature (as a string) with the rest of the definition for decoration mode NAME. @@ -428,11 +428,10 @@ decoration API found in this library." (when (stringp ,loadfile) (unless (fboundp ',predicatedef) (autoload ',predicatedef ',loadfile "Return non-nil to decorate TAG." - nil 'function)) + )) (unless (fboundp ',highlighterdef) - (autoload ',highlighterdef ',loadfile "Decorate TAG." - nil 'function)) + (autoload ',highlighterdef ',loadfile "Decorate TAG.")) )) )) diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el index 6c223c2b9f2..d024e5d8237 100644 --- a/lisp/cedet/semantic/idle.el +++ b/lisp/cedet/semantic/idle.el @@ -578,7 +578,7 @@ This routine creates the following functions and variables:" (setup (intern (concat (symbol-name name) "-mode-setup"))) (func (intern (concat (symbol-name name) "-idle-function")))) - `(eval-and-compile + `(progn (define-minor-mode ,global ,(concat "Toggle " (symbol-name global) ". With ARG, turn the minor mode on if ARG is positive, off otherwise. |
