aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet
diff options
context:
space:
mode:
authorPaul Eggert2011-11-13 20:35:22 -0800
committerPaul Eggert2011-11-13 20:35:22 -0800
commitc3ca24d48c10fb771ee02eb58f7d49bd82d6306e (patch)
treee707b79a846623490feea39a4dceb86dd218eb4d /lisp/cedet
parent6a0bf43d7c5961297aa5024aec534e5bab73c8af (diff)
parent56632ce4cd8616f0613e8734d62ec5e2f833c7dc (diff)
downloademacs-c3ca24d48c10fb771ee02eb58f7d49bd82d6306e.tar.gz
emacs-c3ca24d48c10fb771ee02eb58f7d49bd82d6306e.zip
Merge from trunk.
Diffstat (limited to 'lisp/cedet')
-rw-r--r--lisp/cedet/cedet.el2
-rw-r--r--lisp/cedet/ede/proj-elisp.el2
-rw-r--r--lisp/cedet/semantic/bovine/c.el2
-rw-r--r--lisp/cedet/semantic/decorate/include.el2
-rw-r--r--lisp/cedet/semantic/edit.el2
-rw-r--r--lisp/cedet/semantic/format.el2
-rw-r--r--lisp/cedet/semantic/html.el2
-rw-r--r--lisp/cedet/semantic/scope.el2
-rw-r--r--lisp/cedet/semantic/tag-file.el2
-rw-r--r--lisp/cedet/semantic/texi.el2
-rw-r--r--lisp/cedet/srecode/extract.el2
-rw-r--r--lisp/cedet/srecode/getset.el2
-rw-r--r--lisp/cedet/srecode/mode.el2
13 files changed, 13 insertions, 13 deletions
diff --git a/lisp/cedet/cedet.el b/lisp/cedet/cedet.el
index d2fb066515b..d7645bc97ed 100644
--- a/lisp/cedet/cedet.el
+++ b/lisp/cedet/cedet.el
@@ -75,7 +75,7 @@
75This is used by `semantic-mode' and `global-ede-mode'.") 75This is used by `semantic-mode' and `global-ede-mode'.")
76 76
77(defun cedet-version () 77(defun cedet-version ()
78 "Display all active versions of CEDET and Dependant packages. 78 "Display all active versions of CEDET and Dependent packages.
79 79
80The PACKAGE column is the name of a given package from CEDET. 80The PACKAGE column is the name of a given package from CEDET.
81 81
diff --git a/lisp/cedet/ede/proj-elisp.el b/lisp/cedet/ede/proj-elisp.el
index 42a20cc4a1a..66c71063363 100644
--- a/lisp/cedet/ede/proj-elisp.el
+++ b/lisp/cedet/ede/proj-elisp.el
@@ -217,7 +217,7 @@ is found, such as a `-version' variable, or the standard header."
217 (save-excursion 217 (save-excursion
218 (if (file-symlink-p ec) 218 (if (file-symlink-p ec)
219 (progn 219 (progn
220 ;; Desymlinkafy 220 ;; Desymlinkify
221 (rename-file ec (concat ec ".tmp")) 221 (rename-file ec (concat ec ".tmp"))
222 (copy-file (concat ec ".tmp") ec) 222 (copy-file (concat ec ".tmp") ec)
223 (delete-file (concat ec ".tmp")))) 223 (delete-file (concat ec ".tmp"))))
diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el
index 0b3e6881891..1076402ac91 100644
--- a/lisp/cedet/semantic/bovine/c.el
+++ b/lisp/cedet/semantic/bovine/c.el
@@ -249,7 +249,7 @@ Return the defined symbol as a special spp lex token."
249 (point)))) 249 (point))))
250 ) 250 )
251 251
252 ;; Only do argument checking if the paren was immediatly after 252 ;; Only do argument checking if the paren was immediately after
253 ;; the macro name. 253 ;; the macro name.
254 (if with-args 254 (if with-args
255 (semantic-lex-spp-first-token-arg-list (car raw-stream))) 255 (semantic-lex-spp-first-token-arg-list (car raw-stream)))
diff --git a/lisp/cedet/semantic/decorate/include.el b/lisp/cedet/semantic/decorate/include.el
index e984965a737..a37f43d177f 100644
--- a/lisp/cedet/semantic/decorate/include.el
+++ b/lisp/cedet/semantic/decorate/include.el
@@ -296,7 +296,7 @@ This mode provides a nice context menu on the include statements."
296 ;; Set ourselves up for synchronization 296 ;; Set ourselves up for synchronization
297 (semanticdb-cache-get 297 (semanticdb-cache-get
298 table 'semantic-decoration-unparsed-include-cache) 298 table 'semantic-decoration-unparsed-include-cache)
299 ;; Add a dependancy. 299 ;; Add a dependency.
300 (let ((table semanticdb-current-table)) 300 (let ((table semanticdb-current-table))
301 (semanticdb-add-reference table tag)) 301 (semanticdb-add-reference table tag))
302 ) 302 )
diff --git a/lisp/cedet/semantic/edit.el b/lisp/cedet/semantic/edit.el
index 7f7e82a95c2..307071e743c 100644
--- a/lisp/cedet/semantic/edit.el
+++ b/lisp/cedet/semantic/edit.el
@@ -427,7 +427,7 @@ See `semantic-edits-change-leaf-tag' for details on parents."
427 ;; which must have a value by now. 427 ;; which must have a value by now.
428 428
429 ;; Loop over the search list to find the preceding CDR. 429 ;; Loop over the search list to find the preceding CDR.
430 ;; Fortunatly, (car overlapped-tags) happens to be 430 ;; Fortunately, (car overlapped-tags) happens to be
431 ;; the first tag positionally. 431 ;; the first tag positionally.
432 (let ((tokstart (semantic-tag-start (car overlapped-tags)))) 432 (let ((tokstart (semantic-tag-start (car overlapped-tags))))
433 (while (and list-to-search 433 (while (and list-to-search
diff --git a/lisp/cedet/semantic/format.el b/lisp/cedet/semantic/format.el
index fa6e7517624..381801559da 100644
--- a/lisp/cedet/semantic/format.el
+++ b/lisp/cedet/semantic/format.el
@@ -291,7 +291,7 @@ local definitions."
291 ;; Try and find a trail of parents from PARENT 291 ;; Try and find a trail of parents from PARENT
292 (let ((rlist (list parent)) 292 (let ((rlist (list parent))
293 ) 293 )
294 ;; IMPLELEMENT ME!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 294 ;; IMPLEMENT ME!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
295 (reverse rlist))) 295 (reverse rlist)))
296 296
297(define-overloadable-function semantic-format-tag-canonical-name (tag &optional parent color) 297(define-overloadable-function semantic-format-tag-canonical-name (tag &optional parent color)
diff --git a/lisp/cedet/semantic/html.el b/lisp/cedet/semantic/html.el
index 972ce5e26bc..137759d46ac 100644
--- a/lisp/cedet/semantic/html.el
+++ b/lisp/cedet/semantic/html.el
@@ -61,7 +61,7 @@
61(define-mode-local-override semantic-parse-region 61(define-mode-local-override semantic-parse-region
62 html-mode (&rest ignore) 62 html-mode (&rest ignore)
63 "Parse the current html buffer for semantic tags. 63 "Parse the current html buffer for semantic tags.
64INGNORE any arguments. Always parse the whole buffer. 64IGNORE any arguments. Always parse the whole buffer.
65Each tag returned is of the form: 65Each tag returned is of the form:
66 (\"NAME\" section (:members CHILDREN)) 66 (\"NAME\" section (:members CHILDREN))
67or 67or
diff --git a/lisp/cedet/semantic/scope.el b/lisp/cedet/semantic/scope.el
index 78a1fd049f0..53695015e4a 100644
--- a/lisp/cedet/semantic/scope.el
+++ b/lisp/cedet/semantic/scope.el
@@ -426,7 +426,7 @@ implicit \"object\"."
426 426
427 ;; Collect all the types (class, etc) that are in our heratage. 427 ;; Collect all the types (class, etc) that are in our heratage.
428 ;; These are types that we can extract members from, not those 428 ;; These are types that we can extract members from, not those
429 ;; delclared in using statements, or the like. 429 ;; declared in using statements, or the like.
430 ;; Get the PARENTS including nesting scope for this location. 430 ;; Get the PARENTS including nesting scope for this location.
431 (while parentlist 431 (while parentlist
432 (oset miniscope scope currentscope) 432 (oset miniscope scope currentscope)
diff --git a/lisp/cedet/semantic/tag-file.el b/lisp/cedet/semantic/tag-file.el
index 17fd3b45356..d118d9b6203 100644
--- a/lisp/cedet/semantic/tag-file.el
+++ b/lisp/cedet/semantic/tag-file.el
@@ -154,7 +154,7 @@ Depends on `semantic-dependency-include-path' for searching. Always searches
154 (setq result 154 (setq result
155 ;; I don't have a plan for refreshing tags with a dependency 155 ;; I don't have a plan for refreshing tags with a dependency
156 ;; stuck on them somehow. I'm thinking that putting a cache 156 ;; stuck on them somehow. I'm thinking that putting a cache
157 ;; onto the dependancy finding with a hash table might be best. 157 ;; onto the dependency finding with a hash table might be best.
158 ;;(if (semantic--tag-get-property tag 'dependency-file) 158 ;;(if (semantic--tag-get-property tag 'dependency-file)
159 ;; (semantic--tag-get-property tag 'dependency-file) 159 ;; (semantic--tag-get-property tag 'dependency-file)
160 (:override 160 (:override
diff --git a/lisp/cedet/semantic/texi.el b/lisp/cedet/semantic/texi.el
index 393d64e6420..30c5a5cf8b6 100644
--- a/lisp/cedet/semantic/texi.el
+++ b/lisp/cedet/semantic/texi.el
@@ -421,7 +421,7 @@ Optional argument POINT is where to look for the environment."
421 texinfo-mode (context) 421 texinfo-mode (context)
422 "List smart completions at point. 422 "List smart completions at point.
423Since texinfo is not a programming language the default version is not 423Since texinfo is not a programming language the default version is not
424useful. Insted, look at the current symbol. If it is a command 424useful. Instead, look at the current symbol. If it is a command
425do primitive texinfo built ins. If not, use ispell to lookup words 425do primitive texinfo built ins. If not, use ispell to lookup words
426that start with that symbol." 426that start with that symbol."
427 (let ((prefix (car (oref context :prefix))) 427 (let ((prefix (car (oref context :prefix)))
diff --git a/lisp/cedet/srecode/extract.el b/lisp/cedet/srecode/extract.el
index dba4b876edb..80e6f9d8d1c 100644
--- a/lisp/cedet/srecode/extract.el
+++ b/lisp/cedet/srecode/extract.el
@@ -66,7 +66,7 @@
66 66
67(defmethod srecode-extract-state-extract ((st srecode-extract-state) 67(defmethod srecode-extract-state-extract ((st srecode-extract-state)
68 endpoint) 68 endpoint)
69 "Perform an extraction on the extract state ST with ENDPOITNT. 69 "Perform an extraction on the extract state ST with ENDPOINT.
70If there was no waiting inserter, do nothing." 70If there was no waiting inserter, do nothing."
71 (when (oref st lastinserter) 71 (when (oref st lastinserter)
72 (save-match-data 72 (save-match-data
diff --git a/lisp/cedet/srecode/getset.el b/lisp/cedet/srecode/getset.el
index a582d4ff59e..9a6c27dcd73 100644
--- a/lisp/cedet/srecode/getset.el
+++ b/lisp/cedet/srecode/getset.el
@@ -215,7 +215,7 @@ INCLASS specifies if the cursor is already in CLASS or not."
215 (when (not te) 215 (when (not te)
216 (message "Unknown location for tag-end in %s:" (semantic-tag-name aftertag))) 216 (message "Unknown location for tag-end in %s:" (semantic-tag-name aftertag)))
217 (goto-char te) 217 (goto-char te)
218 ;; If there is a comment immediatly after aftertag, skip over it. 218 ;; If there is a comment immediately after aftertag, skip over it.
219 (when (looking-at (concat "\\s-*\n?\\s-*" semantic-lex-comment-regex)) 219 (when (looking-at (concat "\\s-*\n?\\s-*" semantic-lex-comment-regex))
220 (let ((pos (point)) 220 (let ((pos (point))
221 (rnext (semantic-find-tag-by-overlay-next (point)))) 221 (rnext (semantic-find-tag-by-overlay-next (point))))
diff --git a/lisp/cedet/srecode/mode.el b/lisp/cedet/srecode/mode.el
index 6ca0cefe9a7..bb2db79acc6 100644
--- a/lisp/cedet/srecode/mode.el
+++ b/lisp/cedet/srecode/mode.el
@@ -366,7 +366,7 @@ programming modes."
366 (define-key srecode-prefix-map oldkey nil) 366 (define-key srecode-prefix-map oldkey nil)
367 ))) 367 )))
368 368
369 ;; Update Keybings 369 ;; Update Keybindings
370 (let ((oldbinding (lookup-key srecode-prefix-map binding))) 370 (let ((oldbinding (lookup-key srecode-prefix-map binding)))
371 371
372 ;; During development, allow overrides. 372 ;; During development, allow overrides.