diff options
Diffstat (limited to 'lisp/cedet')
| -rw-r--r-- | lisp/cedet/ede/auto.el | 6 | ||||
| -rw-r--r-- | lisp/cedet/inversion.el | 4 | ||||
| -rw-r--r-- | lisp/cedet/mode-local.el | 2 | ||||
| -rw-r--r-- | lisp/cedet/semantic/analyze.el | 6 | ||||
| -rw-r--r-- | lisp/cedet/semantic/analyze/complete.el | 6 | ||||
| -rw-r--r-- | lisp/cedet/semantic/bovine/gcc.el | 6 | ||||
| -rw-r--r-- | lisp/cedet/semantic/db-find.el | 2 | ||||
| -rw-r--r-- | lisp/cedet/semantic/decorate/include.el | 2 | ||||
| -rw-r--r-- | lisp/cedet/semantic/fw.el | 8 | ||||
| -rw-r--r-- | lisp/cedet/semantic/tag-ls.el | 10 | ||||
| -rw-r--r-- | lisp/cedet/semantic/wisent/javascript.el | 12 | ||||
| -rw-r--r-- | lisp/cedet/srecode/insert.el | 6 |
12 files changed, 35 insertions, 35 deletions
diff --git a/lisp/cedet/ede/auto.el b/lisp/cedet/ede/auto.el index 51459fa7e7..b4fea42144 100644 --- a/lisp/cedet/ede/auto.el +++ b/lisp/cedet/ede/auto.el @@ -239,9 +239,9 @@ type is required and the load function used.") "Add PROJAUTO, an EDE autoload definition to `ede-project-class-files'. Optional argument FLAG indicates how this autoload should be added. Possible values are: - 'generic - A generic project type. Keep this at the very end. - 'unique - A unique project type for a specific project. Keep at the very - front of the list so more generic projects don't get priority." + `generic' - A generic project type. Keep this at the very end. + `unique' - A unique project type for a specific project. Keep at the very + front of the list so more generic projects don't get priority." ;; First, can we identify PROJAUTO as already in the list? If so, replace. (let ((projlist ede-project-class-files) (projname (oref projauto name))) diff --git a/lisp/cedet/inversion.el b/lisp/cedet/inversion.el index 8409b73e71..9d07b67e89 100644 --- a/lisp/cedet/inversion.el +++ b/lisp/cedet/inversion.el @@ -230,8 +230,8 @@ string. INCOMPATIBLE-VERSION can be nil. RESERVED arguments are kept for a later use. Return: - nil if everything is ok. -- 'outdated if VERSION is less than MINIMUM. -- 'incompatible if VERSION is not backward compatible with MINIMUM. +- `outdated' if VERSION is less than MINIMUM. +- `incompatible' if VERSION is not backward compatible with MINIMUM. - t if the check failed." (let ((code (if (stringp version) (inversion-decode-version version) diff --git a/lisp/cedet/mode-local.el b/lisp/cedet/mode-local.el index 72512c6e6b..3192684fbd 100644 --- a/lisp/cedet/mode-local.el +++ b/lisp/cedet/mode-local.el @@ -50,7 +50,7 @@ (require 'find-func) ;; For find-function-regexp-alist. It is tempting to replace this -;; ‘require‘ by (defvar find-function-regexp-alist) and +;; ‘require’ by (defvar find-function-regexp-alist) and ;; with-eval-after-load, but model-local.el is typically loaded when a ;; semantic autoload is invoked, and something in semantic loads ;; find-func.el before mode-local.el, so the eval-after-load is lost. diff --git a/lisp/cedet/semantic/analyze.el b/lisp/cedet/semantic/analyze.el index 7ff6977102..fe888f5776 100644 --- a/lisp/cedet/semantic/analyze.el +++ b/lisp/cedet/semantic/analyze.el @@ -251,7 +251,7 @@ are found in SEQUENCE. Optional argument THROWSYM specifies a symbol the throw on non-recoverable error. Remaining arguments FLAGS are additional flags to apply when searching. This function knows of flags: - 'mustbeclassvariable" + `mustbeclassvariable'" (let ((s sequence) ; copy of the sequence (tmp nil) ; tmp find variable (tag nil) ; tag return list @@ -263,7 +263,7 @@ This function knows of flags: ) ;; First order check. Is this wholly contained in the typecache? (setq tmp (semanticdb-typecache-find sequence)) - + (when tmp (if (or (not tagclass) (semantic-tag-of-class-p tmp tagclass)) ;; We are effectively done... @@ -709,7 +709,7 @@ Returns nil if no alias was found." (when (eq (semantic-tag-get-attribute (car taglist) :kind) 'alias) (let ((tagname (semantic-analyze-split-name - (semantic-tag-name + (semantic-tag-name (car (semantic-tag-get-attribute (car taglist) :members)))))) (append (if (listp tagname) tagname diff --git a/lisp/cedet/semantic/analyze/complete.el b/lisp/cedet/semantic/analyze/complete.el index c47b57336c..680a0ae65b 100644 --- a/lisp/cedet/semantic/analyze/complete.el +++ b/lisp/cedet/semantic/analyze/complete.el @@ -112,9 +112,9 @@ in a buffer." Argument CONTEXT is an object specifying the locally derived context. The optional argument FLAGS changes which return options are returned. FLAGS can be any number of: - 'no-tc - do not apply data-type constraint. - 'no-longprefix - ignore long multi-symbol prefixes. - 'no-unique - do not apply unique by name filtering." + `no-tc' - do not apply data-type constraint. + `no-longprefix' - ignore long multi-symbol prefixes. + `no-unique' - do not apply unique by name filtering." (let* ((a context) (desired-type (semantic-analyze-type-constraint a)) (desired-class (oref a prefixclass)) diff --git a/lisp/cedet/semantic/bovine/gcc.el b/lisp/cedet/semantic/bovine/gcc.el index fe7a14451f..1d3f7730f3 100644 --- a/lisp/cedet/semantic/bovine/gcc.el +++ b/lisp/cedet/semantic/bovine/gcc.el @@ -137,9 +137,9 @@ to give to the program." "The GCC setup data. This is setup by `semantic-gcc-setup'. This is an alist, and should include keys of: - 'version - the version of gcc - '--host - the host symbol (used in include directories) - '--prefix - where GCC was installed. + `version' - the version of gcc + `--host' - the host symbol (used in include directories) + `--prefix' - where GCC was installed. It should also include other symbols GCC was compiled with.") ;;;###autoload diff --git a/lisp/cedet/semantic/db-find.el b/lisp/cedet/semantic/db-find.el index ff3431a17c..293f535d60 100644 --- a/lisp/cedet/semantic/db-find.el +++ b/lisp/cedet/semantic/db-find.el @@ -297,7 +297,7 @@ refreshed when things change. See `semanticdb-ref-test'. Note for overloading: If you opt to overload this function for your major mode, and your routine takes a long time, be sure to call - (semantic-throw-on-input 'your-symbol-here) + (semantic-throw-on-input \\='your-symbol-here) so that it can be called from the idle work handler." ) diff --git a/lisp/cedet/semantic/decorate/include.el b/lisp/cedet/semantic/decorate/include.el index 962dc49da5..1974e0ade0 100644 --- a/lisp/cedet/semantic/decorate/include.el +++ b/lisp/cedet/semantic/decorate/include.el @@ -540,7 +540,7 @@ For C/C++ includes located within a project, you can use a special EDE project that will wrap an existing build system. You can do that like this in your .emacs file: - (ede-cpp-root-project \"NAME\" :file \"FILENAME\" :locate-fcn 'MYFCN) + (ede-cpp-root-project \"NAME\" :file \"FILENAME\" :locate-fcn \\='MYFCN) See the CEDET manual, the EDE manual, or the commentary in ede/cpp-root.el for more. diff --git a/lisp/cedet/semantic/fw.el b/lisp/cedet/semantic/fw.el index 0e81b2c0ba..d8ba6f275f 100644 --- a/lisp/cedet/semantic/fw.el +++ b/lisp/cedet/semantic/fw.el @@ -173,10 +173,10 @@ recover the cached data with `semantic-get-cache-data'. LIFESPAN indicates how long the data cache will be remembered. The default LIFESPAN is 'end-of-command. Possible Lifespans are: - 'end-of-command - Remove the cache at the end of the currently - executing command. - 'exit-cache-zone - Remove when point leaves the overlay at the - end of the currently executing command." + `end-of-command' - Remove the cache at the end of the currently + executing command. + `exit-cache-zone' - Remove when point leaves the overlay at the + end of the currently executing command." ;; Check if LIFESPAN is valid before to create any overlay (or lifespan (setq lifespan 'end-of-command)) (or (memq lifespan '(end-of-command exit-cache-zone)) diff --git a/lisp/cedet/semantic/tag-ls.el b/lisp/cedet/semantic/tag-ls.el index 40eafd9f16..fe4440b1e1 100644 --- a/lisp/cedet/semantic/tag-ls.el +++ b/lisp/cedet/semantic/tag-ls.el @@ -271,11 +271,11 @@ search locally, then semanticdb for that tag (when enabled.)") (define-overloadable-function semantic-tag-protection (tag &optional parent) "Return protection information about TAG with optional PARENT. This function returns on of the following symbols: - nil - No special protection. Language dependent. - 'public - Anyone can access this TAG. - 'private - Only methods in the local scope can access TAG. - 'protected - Like private for outside scopes, like public for child - classes. + nil - No special protection. Language dependent. + `public' - Anyone can access this TAG. + `private' - Only methods in the local scope can access TAG. + `protected' - Like private for outside scopes, like public for child + classes. Some languages may choose to provide additional return symbols specific to themselves. Use of this function should allow for this. diff --git a/lisp/cedet/semantic/wisent/javascript.el b/lisp/cedet/semantic/wisent/javascript.el index b2a18fb48b..a676a8b459 100644 --- a/lisp/cedet/semantic/wisent/javascript.el +++ b/lisp/cedet/semantic/wisent/javascript.el @@ -73,11 +73,11 @@ This function overrides `get-local-variables'." (define-mode-local-override semantic-tag-protection javascript-mode (tag &optional parent) "Return protection information about TAG with optional PARENT. This function returns on of the following symbols: - nil - No special protection. Language dependent. - 'public - Anyone can access this TAG. - 'private - Only methods in the local scope can access TAG. - 'protected - Like private for outside scopes, like public for child - classes. + nil - No special protection. Language dependent. + `public' - Anyone can access this TAG. + `private' - Only methods in the local scope can access TAG. + `protected' - Like private for outside scopes, like public for child + classes. Some languages may choose to provide additional return symbols specific to themselves. Use of this function should allow for this. @@ -114,7 +114,7 @@ This is currently needed for the mozrepl omniscient database." (setq symlist (list (match-string 1 tmp) (substring tmp (1+ (match-end 1)) (length tmp)))) (setq symlist (list tmp)))))))) - + ;;; Setup Function ;; ;; Since javascript-mode is an alias for js-mode, let it inherit all diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el index d1b0015764..2ff3060ac5 100644 --- a/lisp/cedet/srecode/insert.el +++ b/lisp/cedet/srecode/insert.el @@ -45,9 +45,9 @@ Only the ASK style inserter will query the user for a value. Dictionary value references that ask begin with the ? character. Possible values are: - 'ask - Prompt in the minibuffer as the value is inserted. - 'field - Use the dictionary macro name as the inserted value, - and place a field there. Matched fields change together. + `ask' - Prompt in the minibuffer as the value is inserted. + `field' - Use the dictionary macro name as the inserted value, + and place a field there. Matched fields change together. NOTE: The field feature does not yet work with XEmacs." :group 'srecode |