Doc/message fixes.

33 files changed, 237 insertions, 162 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9a0a42f662e..9e87539ab69 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -54,6 +54,78 @@
         * cedet/ede/cpp-root.el (initialize-instance):
         * cedet/ede/autoconf-edit.el (autoconf-find-last-macro)
         (autoconf-parameter-strip, autoconf-insert-new-macro):
+        * cedet/semantic/wisent.el (wisent-lex-eoi):
+        * cedet/semantic/util-modes.el (global-semantic-show-parser-state-mode)
+        (semantic-show-parser-state-mode):
+        * cedet/semantic/texi.el (semantic-texi-environment-regexp):
+        * cedet/semantic/tag.el (semantic-tag-new-variable)
+        (semantic-tag-class, semantic-tag-new-variable, semantic-tag-copy)
+        (semantic--tag-deep-copy-attributes, semantic--tag-deep-copy-value)
+        (semantic--tag-deep-copy-tag-list)
+        (semantic-tag-components-with-overlays-default):
+        * cedet/semantic/symref.el (semantic-symref-find-text):
+        * cedet/semantic/senator.el (senator-yank-tag)
+        (senator-transpose-tags-up):
+        * cedet/semantic/scope.el (semantic-analyze-scoped-tags-default)
+        (semantic-analyze-scoped-inherited-tags, semantic-scope-find):
+        * cedet/semantic/sb.el (semantic-sb-autoexpand-length):
+        * cedet/semantic/lex.el (semantic-lex-comment-regex)
+        (semantic-lex-maximum-depth, define-lex, semantic-lex-token)
+        (semantic-lex-unterminated-syntax-protection, define-lex-analyzer):
+        * cedet/semantic/lex-spp.el
+        (semantic-lex-spp-dynamic-macro-symbol-obarray-stack)
+        (semantic-lex-spp-symbol, semantic-lex-spp-one-token-to-txt):
+        * cedet/semantic/idle.el
+        (semantic-idle-summary-current-symbol-info-brutish)
+        (semantic-idle-summary-current-symbol-info-default):
+        * cedet/semantic/grammar.el (semantic-grammar-recreate-package)
+        (semantic--grammar-macro-compl-dict):
+        * cedet/semantic/grammar-wy.el (semantic-grammar-wy--parse-table):
+        * cedet/semantic/format.el (semantic-format-tag-custom-list)
+        (semantic-format-tag-canonical-name-default):
+        * cedet/semantic/find.el (semantic-find-tag-by-overlay-in-region)
+        (semantic-find-tags-for-completion)
+        (semantic-find-tags-by-scope-protection-default)
+        (semantic-deep-find-tags-for-completion):
+        * cedet/semantic/edit.el
+        (semantic-edits-incremental-reparse-failed-hook)
+        (semantic-edits-verbose-flag, semantic-edits-assert-valid-region)
+        (semantic-edits-splice-remove, semantic-edits-splice-replace):
+        * cedet/semantic/doc.el (semantic-documentation-comment-preceeding-tag):
+        * cedet/semantic/dep.el (semantic-dependency-include-path):
+        * cedet/semantic/db.el (semanticdb-default-find-index-class)
+        (semanticdb-match-any-mode, semanticdb-with-match-any-mode)
+        (semanticdb-project-roots):
+        * cedet/semantic/db-find.el (semanticdb-implied-include-tags)
+        (semanticdb-find-adebug-insert-scanned-tag-cons)
+        (semanticdb-find-log-buffer-name, semanticdb-find-result-mapc)
+        (semanticdb-brute-deep-find-tags-for-completion):
+        * cedet/semantic/db-ebrowse.el (semanticdb-ebrowse-add-tree-to-table):
+        * cedet/semantic/ctxt.el (semantic-beginning-of-context-default)
+        (semantic-end-of-context-default)
+        (semantic-ctxt-current-function-default)
+        (semantic-ctxt-scoped-types-default):
+        * cedet/semantic/complete.el (semantic-complete-read-tag-engine)
+        (semantic-complete-inline-tag-engine)
+        (semantic-complete-inline-custom-type)
+        (semantic-complete-read-tag-analyzer):
+        * cedet/semantic/chart.el (semantic-chart-tags-by-class)
+        (semantic-chart-database-size):
+        * cedet/semantic/analyze.el (semantic-analyze-current-symbol)
+        (semantic-analyze-current-context):
+        * cedet/semantic/symref/list.el (semantic-symref)
+        (semantic-symref-hide-buffer, semantic-symref-symbol):
+        * cedet/semantic/symref/grep.el (semantic-symref-grep-use-template):
+        * cedet/semantic/symref/filter.el (semantic-symref-hits-in-region):
+        * cedet/semantic/bovine/el.el (semantic-elisp-form-to-doc-string):
+        * cedet/semantic/bovine/c.el (semantic-lex-c-preprocessor-symbol-map)
+        (semantic-c-parse-token-hack-depth, semantic-c--template-name-1)
+        (semantic-c-dereference-template):
+        * cedet/semantic/analyze/refs.el (semantic--analyze-refs-full-lookup)
+        (semantic--analyze-refs-full-lookup-with-parents)
+        (semantic--analyze-refs-full-lookup-simple):
+        * cedet/semantic/analyze/complete.el
+        (semantic-analyze-possible-completions):
         * cedet/srecode/table.el (srecode-mode-table-new):
         * cedet/srecode/srt.el (srecode-read-variable-name):
         * cedet/srecode/srt-mode.el (srecode-macro-help, srecode-in-macro-p):
diff --git a/lisp/cedet/semantic/analyze.el b/lisp/cedet/semantic/analyze.el
index 4948bba794e..7acd237d514 100644
--- a/lisp/cedet/semantic/analyze.el
+++ b/lisp/cedet/semantic/analyze.el
@@ -1,7 +1,7 @@
 ;;; semantic/analyze.el --- Analyze semantic tags against local context
 
-;;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -414,7 +414,7 @@ to calculate the context information.  The purpose for this function is
 to provide a large number of non-cached analysis for filtering symbols."
   ;; Only do this in a Semantic enabled buffer.
   (when (not (semantic-active-p))
-    (error "Cannot analyze buffers not supported by Semantic."))
+    (error "Cannot analyze buffers not supported by Semantic"))
   ;; Always refresh out tags in a safe way before doing the
   ;; context.
   (semantic-refresh-tags-safe)
@@ -482,7 +482,7 @@ if a cached copy of the return object is found."
   (interactive "d")
   ;; Only do this in a Semantic enabled buffer.
   (when (not (semantic-active-p))
-    (error "Cannot analyze buffers not supported by Semantic."))
+    (error "Cannot analyze buffers not supported by Semantic"))
   ;; Always refresh out tags in a safe way before doing the
   ;; context.
   (semantic-refresh-tags-safe)
diff --git a/lisp/cedet/semantic/analyze/complete.el b/lisp/cedet/semantic/analyze/complete.el
index 5d858e59949..de392514d66 100644
--- a/lisp/cedet/semantic/analyze/complete.el
+++ b/lisp/cedet/semantic/analyze/complete.el
@@ -1,6 +1,6 @@
 ;;; semantic/analyze/complete.el --- Smart Completions
 
-;;; Copyright (C) 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -21,7 +21,7 @@
 
 ;;; Commentary:
 ;;
-;; Caclulate smart completions.
+;; Calculate smart completions.
 ;;
 ;; Uses the analyzer context routine to determine the best possible
 ;; list of completions.
@@ -88,7 +88,7 @@ in a buffer."
                         context
                       (semantic-analyze-current-context context)))
            (ans (if (not context)
-                    (error "Nothing to Complete.")
+                    (error "Nothing to complete")
                   (:override))))
       ;; If interactive, display them.
       (when (interactive-p)
diff --git a/lisp/cedet/semantic/analyze/refs.el b/lisp/cedet/semantic/analyze/refs.el
index 8e2f2120d69..ca85d471a9c 100644
--- a/lisp/cedet/semantic/analyze/refs.el
+++ b/lisp/cedet/semantic/analyze/refs.el
@@ -140,7 +140,7 @@ Optional argument IN-BUFFER indicates that the returned tag should be in an acti
 ;;; LOOKUP
 ;;
 (defun semantic--analyze-refs-full-lookup (tag scope)
-  "Perform a full lookup for all occurances of TAG in the current project.
+  "Perform a full lookup for all occurrences of TAG in the current project.
 TAG should be the tag currently under point.
 PARENT is the list of tags that are parents to TAG by
 containment, as opposed to reference."
@@ -195,7 +195,7 @@ PARENTS is a list of names."
     ans))
 
 (defun semantic--analyze-refs-full-lookup-with-parents (tag scope)
-  "Perform a lookup for all occurances of TAG based on TAG's SCOPE.
+  "Perform a lookup for all occurrences of TAG based on TAG's SCOPE.
 TAG should be the tag currently under point."
   (let* ((classmatch (semantic-tag-class tag))
          (plist (mapcar (lambda (T) (semantic-tag-name T)) (oref scope parents)))
@@ -242,7 +242,7 @@ TAG should be the tag currently under point."
     answer))
 
 (defun semantic--analyze-refs-full-lookup-simple (tag &optional noerror)
-  "Perform a simple  lookup for occurances of TAG in the current project.
+  "Perform a simple  lookup for occurrences of TAG in the current project.
 TAG should be the tag currently under point.
 Optional NOERROR means don't throw errors on failure to find something.
 This only compares the tag name, and does not infer any matches in namespaces,
diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el
index b9077a2ef0b..9bcf6b1f5c5 100644
--- a/lisp/cedet/semantic/bovine/c.el
+++ b/lisp/cedet/semantic/bovine/c.el
@@ -1,7 +1,7 @@
 ;;; semantic/bovine/c.el --- Semantic details for C
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
-;;; 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -168,7 +168,7 @@ lexical analyzer, such as `symbol' or `string'.  The string in the
 second position is the text that makes up the replacement.  This is
 the way to have multiple lexical symbols in a replacement.  Using the
 first way to specify text like \"foo::bar\" would not work, because :
-is a sepearate lexical symbol.
+is a separate lexical symbol.
 
 A quick way to see what you would need to insert is to place a
 definition such as:
@@ -682,7 +682,7 @@ as for the parent."
     ))
 
 (defvar semantic-c-parse-token-hack-depth 0
-  "Current depth of recursive calls to `semantic-c-parse-lexical-token'")
+  "Current depth of recursive calls to `semantic-c-parse-lexical-token'.")
 
 (defun semantic-c-parse-lexical-token (lexicaltoken nonterminal depth
                                                     returnonerror)
@@ -1284,8 +1284,8 @@ SPEC-LIST is the template specifier of the datatype instantiated."
     (semantic-c--instantiate-template tag (cdr def-list) (cdr spec-list))))
 
 (defun semantic-c--template-name-1 (spec-list)
-  "return a string used to compute template class name based on SPEC-LIST
-for ref<Foo,Bar> it will return 'Foo,Bar'."
+  "Return a string used to compute template class name.
+Based on SPEC-LIST, for ref<Foo,Bar> it will return 'Foo,Bar'."
   (when (car spec-list)
     (let* ((endpart (semantic-c--template-name-1 (cdr spec-list)))
            (separator (and endpart ",")))
@@ -1299,7 +1299,7 @@ return 'ref<Foo,Bar>'."
           "<" (semantic-c--template-name-1 (cdr spec-list)) ">"))
 
 (defun semantic-c-dereference-template (type scope &optional type-declaration)
-  "Dereference any template specifieres in TYPE within SCOPE.
+  "Dereference any template specifiers in TYPE within SCOPE.
 If TYPE is a template, return a TYPE copy with the templates types
 instantiated as specified in TYPE-DECLARATION."
   (when (semantic-tag-p type-declaration)
diff --git a/lisp/cedet/semantic/bovine/el.el b/lisp/cedet/semantic/bovine/el.el
index 596e29228f9..4cf03494c10 100644
--- a/lisp/cedet/semantic/bovine/el.el
+++ b/lisp/cedet/semantic/bovine/el.el
@@ -1,7 +1,7 @@
 ;;; semantic/bovine/el.el --- Semantic details for Emacs Lisp
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -140,7 +140,7 @@ syntax as specified by the syntax table."
 
 (defun semantic-elisp-form-to-doc-string (form)
   "After reading a form FORM, covert it to a doc string.
-For Emacs Lisp, sometimes that string is non-existant.
+For Emacs Lisp, sometimes that string is non-existent.
 Sometimes it is a form which is evaluated at compile time, permitting
 compound strings."
   (cond ((stringp form) form)
diff --git a/lisp/cedet/semantic/chart.el b/lisp/cedet/semantic/chart.el
index 7efe4e6dfae..c526005c7d2 100644
--- a/lisp/cedet/semantic/chart.el
+++ b/lisp/cedet/semantic/chart.el
@@ -1,7 +1,7 @@
 ;;; semantic/chart.el --- Utilities for use with semantic tag tables
 
-;;; Copyright (C) 1999, 2000, 2001, 2003, 2005, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2003, 2005, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -40,7 +40,7 @@
 Each bar represents how many toplevel tags in TAGTABLE
 exist with a given class.  See `semantic-symbol->name-assoc-list'
 for tokens which will be charted.
-TAGTABLE is passedto `semantic-something-to-tag-table'."
+TAGTABLE is passed to `semantic-something-to-tag-table'."
   (interactive)
   (let* ((stream (semantic-something-to-tag-table
                   (or tagtable (current-buffer))))
@@ -108,7 +108,7 @@ TAGTABLE is passed to `semantic-something-to-tag-table'."
   "Create a bar chart representing the complexity of some tags.
 Complexity is calculated for tags of CLASS.  Each bar represents
 the complexity of some tag in TAGTABLE.  Only the most complex
-items are charted.  TAGTABLE is passedto
+items are charted.  TAGTABLE is passed to
 `semantic-something-to-tag-table'."
   (interactive)
   (let* ((sym (if (not class) 'function))
diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el
index a61bccbcb62..1c887672819 100644
--- a/lisp/cedet/semantic/complete.el
+++ b/lisp/cedet/semantic/complete.el
@@ -1,7 +1,7 @@
 ;;; semantic/complete.el --- Routines for performing tag completion
 
-;;; Copyright (C) 2003, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2003, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -36,7 +36,7 @@
 ;; quickly without resorting to "show me every possible option now".
 ;;
 ;; In addition, some symbol names will appear in multiple locations.
-;; If it is important to distiguish, then a way to provide a choice
+;; If it is important to distinguish, then a way to provide a choice
 ;; over these locations is important as well.
 ;;
 ;; Beyond brute force offers for completion of plain strings,
@@ -55,7 +55,7 @@
 ;;
 ;; Here, we will treat each section separately (excluding D)
 ;; They can then be strung together in user-visible commands to
-;; fullfill specific needs.
+;; fulfil specific needs.
 ;;
 ;; COLLECTORS:
 ;;
@@ -194,7 +194,7 @@ Keeps STRINGS only in the history.")
 Argument COLLECTOR is an object which can be used to to calculate
 a list of possible hits.  See `semantic-completion-collector-engine'
 for details on COLLECTOR.
-Argumeng DISPLAYOR is an object used to display a list of possible
+Argument DISPLAYOR is an object used to display a list of possible
 completions for a given prefix.  See`semantic-completion-display-engine'
 for details on DISPLAYOR.
 PROMPT is a string to prompt with.
@@ -736,7 +736,7 @@ DO NOT CALL THIS IF THE INLINE COMPLETION ENGINE IS NOT ACTIVE."
 Argument COLLECTOR is an object which can be used to to calculate
 a list of possible hits.  See `semantic-completion-collector-engine'
 for details on COLLECTOR.
-Argumeng DISPLAYOR is an object used to display a list of possible
+Argument DISPLAYOR is an object used to display a list of possible
 completions for a given prefix.  See`semantic-completion-display-engine'
 for details on DISPLAYOR.
 BUFFER is the buffer in which completion will take place.
@@ -1766,7 +1766,7 @@ completion text in ghost text."
                      C)))
            (eieio-build-class-alist semantic-displayor-abstract t))
           )
-  "Possible options for inlince completion displayors.
+  "Possible options for inline completion displayors.
 Use this to enable custom editing.")
 
 (defcustom semantic-complete-inline-analyzer-displayor-class
@@ -1879,7 +1879,7 @@ to generate the list of possible completions.
 PROMPT is the first part of the prompt.  Additional prompt
 is added based on the contexts full prefix.
 CONTEXT is the semantic analyzer context to start with.
-HISTORY is a symbol representing a variable to stor the history in.
+HISTORY is a symbol representing a variable to store the history in.
 usually a default-tag and initial-input are available for completion
 prompts.  these are calculated from the CONTEXT variable passed in."
   (if (not context) (setq context (semantic-analyze-current-context (point))))
diff --git a/lisp/cedet/semantic/ctxt.el b/lisp/cedet/semantic/ctxt.el
index ab72f4d4e7f..a33d0ad90ae 100644
--- a/lisp/cedet/semantic/ctxt.el
+++ b/lisp/cedet/semantic/ctxt.el
@@ -1,7 +1,7 @@
 ;;; semantic/ctxt.el --- Context calculations for Semantic tools.
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
-;;; 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+;;   2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -86,7 +86,7 @@ Return non-nil if there is no upper context.
 The default behavior uses `semantic-up-context'.")
 
 (defun semantic-beginning-of-context-default (&optional point)
-  "Move POINT to the beginning of the current context via parenthisis.
+  "Move POINT to the beginning of the current context via parenthesis.
 Return non-nil if there is no upper context."
   (if point (goto-char point))
   (if (semantic-up-context)
@@ -101,7 +101,7 @@ Be default, this uses `semantic-up-context', and assumes parenthetical
 block delimiters.")
 
 (defun semantic-end-of-context-default (&optional point)
-  "Move POINT to the end of the current context via parenthisis.
+  "Move POINT to the end of the current context via parenthesis.
 Return non-nil if there is no upper context."
   (if point (goto-char point))
   (let ((start (point)))
@@ -510,7 +510,7 @@ cursor is on the text representing that function.")
 
 (defun semantic-ctxt-current-function-default (&optional point)
   "Return the current function call the cursor is in at POINT.
-The call will be identifed for C like langauges with the form
+The call will be identified for C like languages with the form
  NAME ( args ... )"
   (if point (goto-char point))
   (let ((case-fold-search semantic-case-fold))
@@ -602,7 +602,7 @@ that may or may not have a name.)")
 (defun semantic-ctxt-scoped-types-default (&optional point)
   "Return a list of scoped types by name for the current context at POINT.
 This is very different for various languages, and does nothing unless
-overriden."
+overridden."
   (if point (goto-char point))
   (let ((case-fold-search semantic-case-fold))
     ;; We need to look at TYPES within the bounds of locally parse arguments.
diff --git a/lisp/cedet/semantic/db-ebrowse.el b/lisp/cedet/semantic/db-ebrowse.el
index 8649a49977f..381a9299052 100644
--- a/lisp/cedet/semantic/db-ebrowse.el
+++ b/lisp/cedet/semantic/db-ebrowse.el
@@ -1,6 +1,7 @@
 ;;; semantic/db-ebrowse.el --- Semanticdb backend using ebrowse.
 
-;;; Copyright (C) 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2005, 2006, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Authors: Eric M. Ludlam <zappo@gnu.org>
 ;;      Joakim Verona
@@ -403,7 +404,7 @@ If there is no database for DIRECTORY available, then
 
 (defun semanticdb-ebrowse-add-tree-to-table (dbe tree &optional fname baseclasses)
   "For database DBE, add the ebrowse TREE into the table for FNAME.
-Optional argument BASECLASSES specifyies a baseclass to the tree being provided."
+Optional argument BASECLASSES specifies a baseclass to the tree being provided."
   (if (not (ebrowse-ts-p tree))
       (signal 'wrong-type-argument (list 'ebrowse-ts-p tree)))
 
diff --git a/lisp/cedet/semantic/db-find.el b/lisp/cedet/semantic/db-find.el
index e7ce7fcbdef..5a043c45c60 100644
--- a/lisp/cedet/semantic/db-find.el
+++ b/lisp/cedet/semantic/db-find.el
@@ -1,7 +1,7 @@
 ;;; semantic/db-find.el --- Searching through semantic databases.
 
-;;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
+;;   2009 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: tags
@@ -103,7 +103,7 @@
 ;; eldoc - popup help
 ;;   => Requires basic search using default path.  (Header files ok)
 ;; tag jump - jump to a named tag
-;;   => Requires a brute search useing whole project.  (Source files only)
+;;   => Requires a brute search using whole project.  (Source files only)
 ;; completion - Completing symbol names in a smart way
 ;;   => Basic search (headers ok)
 ;; type analysis - finding type definitions for variables & fcns
@@ -440,7 +440,7 @@ and TAG is a clone of the include tag that was found.")
 Set this variable with `defvar-mode-local' for a particular mode so
 that any symbols that exist for all files for that mode are included.
 
-Note: This could be used as a way to write a file in a langauge
+Note: This could be used as a way to write a file in a language
 to declare all the built-ins for that language.")
 
 (defun semanticdb-find-translate-path-includes--internal (path)
@@ -781,7 +781,7 @@ Examines the variable `semanticdb-find-lost-includes'."
 
 (defun semanticdb-find-adebug-insert-scanned-tag-cons (consdata prefix prebuttontext)
   "Insert a button representing scanned include CONSDATA.
-PREFIX is the text that preceeds the button.
+PREFIX is the text that precedes the button.
 PREBUTTONTEXT is some text between prefix and the overlay button."
   (let* ((start (point))
          (end nil)
@@ -1019,7 +1019,7 @@ is still made current."
 (defun semanticdb-find-result-mapc (fcn result)
   "Apply FCN to each element of find RESULT for side-effects only.
 FCN takes two arguments.  The first is a TAG, and the
-second is a DB from wence TAG originated.
+second is a DB from whence TAG originated.
 Returns result."
   (mapc (lambda (sublst)
           (mapc (lambda (tag)
@@ -1038,7 +1038,7 @@ Returns result."
   "The name of the logging buffer.")
 
 (defun semanticdb-find-toggle-logging ()
-  "Toggle sematnicdb logging."
+  "Toggle semanticdb logging."
   (interactive)
   (setq semanticdb-find-log-flag (null semanticdb-find-log-flag))
   (message "Semanticdb find logging is %sabled"
@@ -1239,7 +1239,7 @@ associated with that tag should be loaded into a buffer."
 See `semanticdb-find-translate-path' for details on PATH.
 The argument BRUTISH will be set so that searching includes all tables
 in the current project.
-FIND-FILE-MATCH indicates that any time a matchi is found, the file
+FIND-FILE-MATCH indicates that any time a match is found, the file
 associated wit that tag should be loaded into a buffer."
   (semanticdb-find-tags-collector
    (lambda (table tags)
@@ -1251,7 +1251,7 @@ associated wit that tag should be loaded into a buffer."
 See `semanticdb-find-translate-path' for details on PATH.
 The argument BRUTISH will be set so that searching includes all tables
 in the current project.
-FIND-FILE-MATCH indicates that any time a matchi is found, the file
+FIND-FILE-MATCH indicates that any time a match is found, the file
 associated wit that tag should be loaded into a buffer."
   (semanticdb-find-tags-collector
    (lambda (table tags)
diff --git a/lisp/cedet/semantic/db.el b/lisp/cedet/semantic/db.el
index bc25d31f19e..0dbe4eb0b0a 100644
--- a/lisp/cedet/semantic/db.el
+++ b/lisp/cedet/semantic/db.el
@@ -1,7 +1,7 @@
 ;;; semantic/db.el --- Semantic tag database manager
 
-;;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: tags
@@ -53,7 +53,7 @@ mechanism.")
 
 (defvar semanticdb-default-find-index-class 'semanticdb-find-search-index
   "The default type of search index to use for a `semanticdb-table's.
-This can be changed to try out new types of search indicies.")
+This can be changed to try out new types of search indices.")
 (make-variable-buffer-local 'semanticdb-default-find=index-class)
 
 ;;;###autoload
@@ -709,14 +709,14 @@ Uses `semanticdb-persistent-path' to determine the return value."
       nil))
 
 (defvar semanticdb-match-any-mode nil
-  "Non-nil to temporarilly search any major mode for a tag.
+  "Non-nil to temporarily search any major mode for a tag.
 If a particular major mode wants to search any mode, put the
 `semantic-match-any-mode' symbol onto the symbol of that major mode.
 Do not set the value of this variable permanently.")
 
 (defmacro semanticdb-with-match-any-mode (&rest body)
-  "A Semanticdb search occuring withing BODY will search tags in all modes.
-This temporarilly sets `semanticdb-match-any-mode' while executing BODY."
+  "A Semanticdb search occurring withing BODY will search tags in all modes.
+This temporarily sets `semanticdb-match-any-mode' while executing BODY."
   `(let ((semanticdb-match-any-mode t))
      ,@body))
 (put 'semanticdb-with-match-any-mode 'lisp-indent-function 0)
@@ -764,7 +764,7 @@ local variable."
 (defcustom semanticdb-project-roots nil
   "*List of directories, where each directory is the root of some project.
 All subdirectories of a root project are considered a part of one project.
-Values in this string can be overriden by project management programs
+Values in this string can be overridden by project management programs
 via the `semanticdb-project-root-functions' variable."
   :group 'semanticdb
   :type '(repeat string))
diff --git a/lisp/cedet/semantic/dep.el b/lisp/cedet/semantic/dep.el
index d4b17744d06..f80f2745c17 100644
--- a/lisp/cedet/semantic/dep.el
+++ b/lisp/cedet/semantic/dep.el
@@ -1,6 +1,6 @@
 ;;; semantic/dep.el --- Methods for tracking dependencies (include files)
 
-;;; Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2006, 2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -30,7 +30,7 @@
 ;; EDE or even ECB can control our project dependencies, and help us
 ;; find file within the setting of a given project.  For system
 ;; dependencies, we need to depend on user supplied lists, which can
-;; manifest themselves in the form of system datatabases (from
+;; manifest themselves in the form of system databases (from
 ;; semanticdb.)
 ;;
 ;; Provide ways to track these different files here.
@@ -47,7 +47,7 @@ to the file being included.
 If `semantic-dependency-tag-file' is overridden for a given
 language, this path is most likely ignored.
 
-The above function, reguardless of being overriden, caches the
+The above function, regardless of being overridden, caches the
 located dependency file location in the tag property
 `dependency-file'.  If you override this function, you do not
 need to implement your own cache.  Each time the buffer is fully
diff --git a/lisp/cedet/semantic/doc.el b/lisp/cedet/semantic/doc.el
index 9feeee294f6..e92986d1ab4 100644
--- a/lisp/cedet/semantic/doc.el
+++ b/lisp/cedet/semantic/doc.el
@@ -1,7 +1,7 @@
 ;;; semantic/doc.el --- Routines for documentation strings
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2005, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2005, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -23,7 +23,7 @@
 
 ;;; Commentary:
 ;;
-;; It is good practice to write documenation for your functions and
+;; It is good practice to write documentation for your functions and
 ;; variables.  These core routines deal with these documentation
 ;; comments or strings.  They can exist either as a tag property
 ;; (:documentation) or as a comment just before the symbol, or after
@@ -61,10 +61,11 @@ If nosnarf if 'lex, then only return the lex token."
           ;; Not sure yet.  Fill in something clever later....
           nil))))))
 
+;; FIXME this is not how you spell "preceding".
 (defun semantic-documentation-comment-preceeding-tag (&optional tag nosnarf)
-  "Find a comment preceeding TAG.
+  "Find a comment preceding TAG.
 If TAG is nil.  use the tag under point.
-Searches the space between TAG and the preceeding tag for a comment,
+Searches the space between TAG and the preceding tag for a comment,
 and converts the comment into clean documentation.
 Optional argument NOSNARF with a value of 'lex means to return
 just the lexical token and not the string."
diff --git a/lisp/cedet/semantic/edit.el b/lisp/cedet/semantic/edit.el
index cb573e35c1e..11ed2e5a4e4 100644
--- a/lisp/cedet/semantic/edit.el
+++ b/lisp/cedet/semantic/edit.el
@@ -1,7 +1,7 @@
 ;;; semantic/edit.el --- Edit Management for Semantic
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
-;;; 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -54,7 +54,7 @@
 ;;    syntax instead.
 ;;
 ;; 2. Incremental parsing while a new function is being typed in
-;;    somtimes gets a chance only when lists are incomplete,
+;;    sometimes gets a chance only when lists are incomplete,
 ;;    preventing correct context identification.
 
 ;;
@@ -114,13 +114,13 @@ incremental reparse.")
 
 (defvar semantic-edits-incremental-reparse-failed-hook nil
   "Hook run after the incremental parser fails.
-When this happens, the buffer is marked as needing a full reprase.")
+When this happens, the buffer is marked as needing a full reparse.")
 
 (semantic-varalias-obsolete 'semantic-edits-incremental-reparse-failed-hooks
                             'semantic-edits-incremental-reparse-failed-hook)
 
 (defcustom semantic-edits-verbose-flag nil
-  "Non-nil means the incremental perser is verbose.
+  "Non-nil means the incremental parser is verbose.
 If nil, errors are still displayed, but informative messages are not."
   :group 'semantic
   :type 'boolean)
@@ -499,7 +499,7 @@ the semantic cache to see what needs to be changed."
     changed-tags))
 
 (defmacro semantic-edits-assert-valid-region ()
-  "Asert that parse-start and parse-end are sorted correctly."
+  "Assert that parse-start and parse-end are sorted correctly."
 ;;;  (if (> parse-start parse-end)
 ;;;      (error "Bug is %s !> %d!  Buff min/max = [ %d %d ]"
 ;;;          parse-start parse-end
@@ -838,7 +838,7 @@ This function is for internal use by `semantic-edits-incremental-parser'."
 ;; list can be fiddled.
 (defun semantic-edits-splice-remove (oldtags parent cachelist)
   "Remove OLDTAGS from PARENT's CACHELIST.
-OLDTAGS are tags in the currenet buffer, preferably linked
+OLDTAGS are tags in the current buffer, preferably linked
 together also in CACHELIST.
 PARENT is the parent tag containing OLDTAGS.
 CACHELIST should be the children from PARENT, but may be
@@ -931,7 +931,7 @@ convenient location, so use that."
 
 (defun semantic-edits-splice-replace (oldtag newtag)
   "Replace OLDTAG with NEWTAG in the current cache.
-Do this by recycling OLDTAG's first CONS cell.  This effectivly
+Do this by recycling OLDTAG's first CONS cell.  This effectively
 causes the new tag to completely replace the old one.
 Make sure that all information in the overlay is transferred.
 It is presumed that OLDTAG and NEWTAG are both cooked.
diff --git a/lisp/cedet/semantic/find.el b/lisp/cedet/semantic/find.el
index 9886685cb5d..5b5a9296d07 100644
--- a/lisp/cedet/semantic/find.el
+++ b/lisp/cedet/semantic/find.el
@@ -1,7 +1,7 @@
 ;;; semantic/find.el --- Search routines for Semantic
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -32,11 +32,11 @@
 ;;    used for compatibility with the semantic 1.x search routines.
 ;;
 ;; 1.5) semantic-brute-find-first-tag-by-*
-;;    Like 1, except seraching stops on the first match for the given
+;;    Like 1, except searching stops on the first match for the given
 ;;    information.
 ;;
 ;; 2) semantic-find-tag-by-*
-;;    These prefered search routines attempt to scan through lists
+;;    These preferred search routines attempt to scan through lists
 ;;    in an intelligent way based on questions asked.
 ;;
 ;; 3) semantic-find-*-overlay
@@ -86,7 +86,7 @@ from largest to smallest via the start location."
 ;;;###autoload
 (defun semantic-find-tag-by-overlay-in-region (start end &optional buffer)
   "Find all tags which exist in whole or in part between START and END.
-Uses overlays to determine positin.
+Uses overlays to determine position.
 Optional BUFFER argument specifies the buffer to use."
   (save-excursion
     (if buffer (set-buffer buffer))
@@ -279,7 +279,7 @@ TABLE is a tag table.  See `semantic-something-to-tag-table'."
       ,table)))
 
 (defmacro semantic-find-tags-for-completion (prefix &optional table)
-  "Find all tags whos name begins with PREFIX in TABLE.
+  "Find all tags whose name begins with PREFIX in TABLE.
 PREFIX is a string.
 TABLE is a tag table.  See `semantic-something-to-tag-table'.
 While it would be nice to use `try-completion' or `all-completions',
@@ -350,7 +350,7 @@ See `semantic-tag-protected-p' for details on which tags are returned."
 
 (defun semantic-find-tags-by-scope-protection-default
   (scopeprotection parent &optional table)
-  "Find all tags accessable by SCOPEPROTECTION.
+  "Find all tags accessible by SCOPEPROTECTION.
 SCOPEPROTECTION is a symbol which can be returned by the method
 `semantic-tag-protection'.  A hard-coded order is used to determine a match.
 PARENT is a tag representing the PARENT slot needed for
@@ -383,7 +383,7 @@ See also `semantic-find-tags-by-name'."
     ,name (semantic-flatten-tags-table ,table)))
 
 (defmacro semantic-deep-find-tags-for-completion (prefix &optional table)
-  "Find all tags whos name begins with PREFIX in TABLE.
+  "Find all tags whose name begins with PREFIX in TABLE.
 Search in top level tags, and their components, in TABLE.
 TABLE is a tag table.  See `semantic-flatten-tags-table'.
 See also `semantic-find-tags-for-completion'."
diff --git a/lisp/cedet/semantic/format.el b/lisp/cedet/semantic/format.el
index 13945931b3f..446fe6c03db 100644
--- a/lisp/cedet/semantic/format.el
+++ b/lisp/cedet/semantic/format.el
@@ -1,7 +1,7 @@
 ;;; semantic/format.el --- Routines for formatting tags
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -71,7 +71,7 @@ COLOR indicates that the generated text should be colored using
           (mapcar (lambda (f) (list 'const f))
                   semantic-format-tag-functions)
           '(function))
-  "A List used by customizeable variables to choose a tag to text function.
+  "A List used by customizable variables to choose a tag to text function.
 Use this variable in the :type field of a customizable variable.")
 
 (defcustom semantic-format-use-images-flag ezimage-use-images
@@ -304,7 +304,7 @@ Optional argument COLOR means highlight the prototype with font-lock colors.")
 
 (defun semantic-format-tag-canonical-name-default (tag &optional parent color)
   "Return a canonical name for TAG.
-A canonical name includes the names of any parents or namespaces preceeding
+A canonical name includes the names of any parents or namespaces preceding
 the tag with colons separating them.
 Optional argument PARENT is the parent type if TAG is a detail.
 Optional argument COLOR means highlight the prototype with font-lock colors."
diff --git a/lisp/cedet/semantic/grammar-wy.el b/lisp/cedet/semantic/grammar-wy.el
index 4f70623ea07..36bb13a7424 100644
--- a/lisp/cedet/semantic/grammar-wy.el
+++ b/lisp/cedet/semantic/grammar-wy.el
@@ -340,7 +340,7 @@
              (cond
               ((vectorp elt)
                (if prec
-                   (error "duplicate %%prec in `%s:%d' rule" nterm rindx))
+                   (error "Duplicate %%prec in `%s:%d' rule" nterm rindx))
                (setq prec
                      (aref elt 0)))
               ((consp elt)
diff --git a/lisp/cedet/semantic/grammar.el b/lisp/cedet/semantic/grammar.el
index f47275bdcf6..cbcdbcb4090 100644
--- a/lisp/cedet/semantic/grammar.el
+++ b/lisp/cedet/semantic/grammar.el
@@ -1,7 +1,7 @@
 ;;; semantic/grammar.el --- Major mode framework for Semantic grammars
 
-;;; Copyright (C) 2002, 2003, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2003, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: David Ponce <david@dponce.com>
 ;; Maintainer: David Ponce <david@dponce.com>
@@ -949,7 +949,7 @@ Lisp code."
     output))
 
 (defun semantic-grammar-recreate-package ()
-  "Unconditionnaly create Lisp code from grammar in current buffer.
+  "Unconditionally create Lisp code from grammar in current buffer.
 Like \\[universal-argument] \\[semantic-grammar-create-package]."
   (interactive)
   (semantic-grammar-create-package t))
@@ -1537,7 +1537,7 @@ library found in DEF."
           (list mac lib))))
 
 (defun semantic--grammar-macro-compl-dict ()
-  "Return a completion dictionnary of macro definitions."
+  "Return a completion dictionary of macro definitions."
   (let ((defs (semantic-grammar-macros))
         def dups dict)
     (while defs
diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el
index 02170154298..f10131579b3 100644
--- a/lisp/cedet/semantic/idle.el
+++ b/lisp/cedet/semantic/idle.el
@@ -1,7 +1,7 @@
 ;;; idle.el --- Schedule parsing tasks in idle time
 
-;;; Copyright (C) 2003, 2004, 2005, 2006, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2003, 2004, 2005, 2006, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 ;; Keywords: syntax
@@ -714,7 +714,7 @@ If semanticdb is not in use, use the current buffer only."
 (defun semantic-idle-summary-current-symbol-info-brutish ()
   "Return a string message describing the current context.
 Gets a symbol with `semantic-ctxt-current-thing' and then
-trys to find it with a deep targetted search."
+tries to find it with a deep targeted search."
   ;; Try the current "thing".
   (let ((sym (car (semantic-ctxt-current-thing))))
     (when sym
@@ -740,7 +740,7 @@ Use the semantic analyzer to find the symbol information."
 
 (defun semantic-idle-summary-current-symbol-info-default ()
   "Return a string message describing the current context.
-This functin will disable loading of previously unloaded files
+This function will disable loading of previously unloaded files
 by semanticdb as a time-saving measure."
   (let (
         (semanticdb-find-default-throttle
diff --git a/lisp/cedet/semantic/lex-spp.el b/lisp/cedet/semantic/lex-spp.el
index edd377f2ab4..335a976e024 100644
--- a/lisp/cedet/semantic/lex-spp.el
+++ b/lisp/cedet/semantic/lex-spp.el
@@ -1,6 +1,6 @@
 ;;; lex-spp.el --- Semantic Lexical Pre-processor
 
-;;; Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2006, 2007, 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -91,7 +91,7 @@ added and removed from this symbol table.")
 (make-variable-buffer-local 'semantic-lex-spp-dynamic-macro-symbol-obarray)
 
 (defvar semantic-lex-spp-dynamic-macro-symbol-obarray-stack nil
-  "A stack of obarrays for temporarilly scoped macro values.")
+  "A stack of obarrays for temporarily scoped macro values.")
 (make-variable-buffer-local 'semantic-lex-spp-dynamic-macro-symbol-obarray-stack)
 
 (defvar semantic-lex-spp-expanded-macro-stack nil
@@ -133,7 +133,7 @@ currently being expanded."
 ;;
 (defsubst semantic-lex-spp-symbol (name)
   "Return spp symbol with NAME or nil if not found.
-The searcy priority is:
+The search priority is:
   1. DYNAMIC symbols
   2. PROJECT specified symbols.
   3. SYSTEM specified symbols."
@@ -383,7 +383,7 @@ ARGVALUES are values for any arg list, or nil."
 If TOK is made of multiple tokens, convert those to text.  This
 conversion is needed if a macro has a merge symbol in it that
 combines the text of two previously distinct symbols.  For
-exampe, in c:
+example, in c:
 
 #define (a,b) a ## b;
 
diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el
index eb6d46df473..10693882627 100644
--- a/lisp/cedet/semantic/lex.el
+++ b/lisp/cedet/semantic/lex.el
@@ -1,7 +1,7 @@
 ;;; semantic/lex.el --- Lexical Analyzer builder
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
-;;; 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -41,12 +41,12 @@
 ;; the lexical analysis.
 ;;
 ;; In the lexical analyzer created with `define-lex', each condition
-;; is tested for a given point.  When the conditin is true, the forms
+;; is tested for a given point.  When the condition is true, the forms
 ;; run.
 ;;
 ;; The forms can push a lexical token onto the token stream.  The
 ;; analyzer forms also must move the current analyzer point.  If the
-;; analyzer point is moved without pushing a token, then tne matched
+;; analyzer point is moved without pushing a token, then the matched
 ;; syntax is effectively ignored, or skipped.
 ;;
 ;; Thus, starting at the beginning of a region to be analyzed, each
@@ -61,7 +61,7 @@
 ;;
 ;; The `define-lex' macro accepts a list of lexical analyzers.  Each
 ;; analyzer is created with `define-lex-analyzer', or one of the
-;; derivitive macros.  A single analyzer defines a regular expression
+;; derivative macros.  A single analyzer defines a regular expression
 ;; to match text in a buffer, and a short segment of code to create
 ;; one lexical token.
 ;;
@@ -105,7 +105,7 @@
 ;;           Keywords are used by `semantic-lex-symbol-or-keyword'
 ;;           to create lexical tokens based on the keyword.
 ;;
-;;   Lexical type table - A table of symbols declared in a grammer
+;;   Lexical type table - A table of symbols declared in a grammar
 ;;           file with the %type declaration.
 ;;           The grammar compiler uses the type table to create new
 ;;           lexical analyzers.  These analyzers are then used to when
@@ -115,10 +115,10 @@
 ;;
 ;; A lexical type defines a kind of lexical analyzer that will be
 ;; automatically generated from a grammar file based on some
-;; predetermined attributes. For now these two attributes are
+;; predetermined attributes.  For now these two attributes are
 ;; recognized :
 ;;
-;; * matchdatatype : define the kind of lexical analyzer. That is :
+;; * matchdatatype : define the kind of lexical analyzer.  That is :
 ;;
 ;;   - regexp : define a regexp analyzer (see
 ;;     `define-lex-regex-type-analyzer')
@@ -136,7 +136,7 @@
 ;;     `define-lex-keyword-type-analyzer')
 ;;
 ;; * syntax : define the syntax that matches a syntactic
-;;   expression. When syntax is matched the corresponding type
+;;   expression.  When syntax is matched the corresponding type
 ;;   analyzer is entered and the resulting match data will be
 ;;   interpreted based on the kind of analyzer (see matchdatatype
 ;;   above).
@@ -576,7 +576,7 @@ See also `semantic-lex-syntax-modifications'.")
 (defvar semantic-lex-comment-regex nil
   "Regular expression for identifying comment start during lexical analysis.
 This may be automatically set when semantic initializes in a mode, but
-may need to be overriden for some special languages.")
+may need to be overridden for some special languages.")
 (make-variable-buffer-local 'semantic-lex-comment-regex)
 
 (defvar semantic-lex-number-expression
@@ -730,7 +730,7 @@ Argument ANALYZERS is the list of analyzers being used."
   "The current depth as tracked through lexical functions.")
 
 (defvar semantic-lex-maximum-depth nil
-  "The maximum depth of parenthisis as tracked through lexical functions.")
+  "The maximum depth of parenthesis as tracked through lexical functions.")
 
 (defvar semantic-lex-token-stream nil
   "The current token stream we are collecting.")
@@ -765,7 +765,7 @@ Each analyzer should be an analyzer created with `define-lex-analyzer'.
 Note: The order in which analyzers are listed is important.
 If two analyzers can match the same text, it is important to order the
 analyzers so that the one you want to match first occurs first.  For
-example, it is good to put a numbe analyzer in front of a symbol
+example, it is good to put a number analyzer in front of a symbol
 analyzer which might mistake a number for as a symbol."
   `(defun ,name  (start end &optional depth length)
      ,(concat doc "\nSee `semantic-lex' for more information.")
@@ -897,7 +897,7 @@ The collapsed tokens are saved in `semantic-lex-block-streams'."
   "Create a lexical token.
 SYMBOL is a symbol representing the class of syntax found.
 START and END define the bounds of the token in the current buffer.
-Optional STR is the string for the token iff the the bounds
+Optional STR is the string for the token only if the the bounds
 in the buffer do not cover the string they represent.  (As from
 macro expansion.)"
   ;; This if statement checks the existance of a STR argument at
@@ -1066,7 +1066,7 @@ Only in effect if `debug-on-error' is also non-nil."
   "For SYNTAX, execute FORMS with protection for unterminated syntax.
 If FORMS throws an error, treat this as a syntax problem, and
 execute the unterminated syntax code.  FORMS should return a position.
-Irreguardless of an error, the cursor should be moved to the end of
+Irregardless of an error, the cursor should be moved to the end of
 the desired syntax, and a position returned.
 If `debug-on-error' is set, errors are not caught, so that you can
 debug them.
@@ -1093,7 +1093,7 @@ While forms are running, the following variables will be locally bound:
   `semantic-lex-maximum-depth' - The maximum depth of semantic-list
                   for the current analysis.
   `semantic-lex-current-depth' - The current depth of `semantic-list' that has
-                  been decended.
+                  been descended.
   `semantic-lex-end-point' - End Point after match.
                    Analyzers should set this to a buffer location if their
                    match string does not represent the end of the matched text.
diff --git a/lisp/cedet/semantic/sb.el b/lisp/cedet/semantic/sb.el
index b7e85ba8387..7a943815afd 100644
--- a/lisp/cedet/semantic/sb.el
+++ b/lisp/cedet/semantic/sb.el
@@ -40,7 +40,7 @@
 
 (defcustom semantic-sb-autoexpand-length 1
   "*Length of a semantic bucket to autoexpand in place.
-This will replace the named bucket that would have usually occured here."
+This will replace the named bucket that would have usually occurred here."
   :group 'speedbar
   :type 'integer)
 
diff --git a/lisp/cedet/semantic/scope.el b/lisp/cedet/semantic/scope.el
index 30b394d4a07..1a077c79c63 100644
--- a/lisp/cedet/semantic/scope.el
+++ b/lisp/cedet/semantic/scope.el
@@ -24,7 +24,7 @@
 ;; Calculate information about the current scope.
 ;;
 ;; Manages the current scope as a structure that can be cached on a
-;; per-file basis and recycled between different occurances of
+;; per-file basis and recycled between different occurrences of
 ;; analysis on different parts of a file.
 ;;
 ;; Pattern for Scope Calculation
@@ -388,7 +388,7 @@ without use of \"object.function()\" style syntax due to an
 implicit \"object\".")
 
 (defun semantic-analyze-scoped-tags-default (typelist halfscope)
-  "Return accessable tags when TYPELIST and HALFSCOPE is in scope.
+  "Return accessible tags when TYPELIST and HALFSCOPE is in scope.
 HALFSCOPE is the current scope partially initialized.
 Tags returned are not in the global name space, but are instead
 scoped inside a class or namespace.  Such items can be referenced
@@ -556,8 +556,8 @@ PROTECTION specifies the type of access requested, such as 'public or 'private."
 Argument SCOPE specify additional tags that are in scope
 whose tags can be searched when needed, OR it may be a scope object.
 ACCESS is the level of access we filter on child supplied tags.
-For langauges with protection on specific methods or slots,
-it should strip out those not accessable by methods of TYPE.
+For languages with protection on specific methods or slots,
+it should strip out those not accessible by methods of TYPE.
 An ACCESS of 'public means not in a method of a subclass of type.
 A value of 'private means we can access private parts of the originating
 type."
@@ -733,7 +733,7 @@ The class returned from the scope calculation is variable
         scopecache))))
 
 (defun semantic-scope-find (name &optional class scope-in)
-  "Find the tag with NAME, and optinal CLASS in the current SCOPE-IN.
+  "Find the tag with NAME, and optional CLASS in the current SCOPE-IN.
 Searches various elements of the scope for NAME.  Return ALL the
 hits in order, with the first tag being in the closest scope."
   (let ((scope (or scope-in (semantic-calculate-scope)))
diff --git a/lisp/cedet/semantic/senator.el b/lisp/cedet/semantic/senator.el
index 41735f9c6c7..cae6a53e673 100644
--- a/lisp/cedet/semantic/senator.el
+++ b/lisp/cedet/semantic/senator.el
@@ -1,7 +1,7 @@
 ;;; semantic/senator.el --- SEmantic NAvigaTOR
 
 ;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
-;; 2009 Free Software Foundation, Inc.
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: David Ponce <david@dponce.com>
 ;; Maintainer: FSF
@@ -208,7 +208,7 @@ Ignore tags of classes in `senator-search-ignore-tag-classes'"
 (defvar senator-search-tag-filter-functions
   '(senator-search-default-tag-filter)
   "List of functions to be called to filter searched tags.
-Each function is passed a tag. If one of them returns nil, the tag is
+Each function is passed a tag.  If one of them returns nil, the tag is
 excluded from the search.")
 
 (defun senator-search (searcher text &optional bound noerror count)
@@ -413,7 +413,7 @@ NOERROR and COUNT arguments."
     (error "No previous search"))))
 
 (defun senator-nonincremental-search-forward (string)
-  "Search for STRING  nonincrementally."
+  "Search for STRING nonincrementally."
   (interactive "sSemantic search for string: ")
   (setq senator-last-search-type 'string)
   (if (equal string "")
@@ -544,7 +544,7 @@ Some tags such as includes have other reference features."
         (error "Unknown result type from `semantic-up-reference'"))))))
 
 (defun semantic-up-reference-default (tag)
-  "Return a tag that is referredto by TAG.
+  "Return a tag that is referred to by TAG.
 Makes C/C++ language like assumptions."
   (cond ((semantic-tag-faux-p tag)
          ;; Faux tags should have a real tag in some other location.
@@ -707,7 +707,7 @@ the kill ring.  Retrieve that text with \\[yank]."
 ;;;###autoload
 (defun senator-yank-tag ()
   "Yank a tag from the tag ring.
-The form the tag takes is differnet depending on where it is being
+The form the tag takes is different depending on where it is being
 yanked to."
   (interactive)
   (or (ring-empty-p senator-tag-ring)
@@ -735,7 +735,7 @@ kill ring."
 
 ;;;###autoload
 (defun senator-transpose-tags-up ()
-  "Transpose the current tag, and the preceeding tag."
+  "Transpose the current tag, and the preceding tag."
   (interactive)
   (semantic-fetch-tags)
   (let* ((current-tag (semantic-current-tag))
diff --git a/lisp/cedet/semantic/symref.el b/lisp/cedet/semantic/symref.el
index bea148b1c21..2022ce82fc1 100644
--- a/lisp/cedet/semantic/symref.el
+++ b/lisp/cedet/semantic/symref.el
@@ -1,6 +1,6 @@
 ;;; semantic/symref.el --- Symbol Reference API
 
-;;; Copyright (C) 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
 
@@ -25,7 +25,7 @@
 ;;
 ;; Semantic's native parsing tools do not handle symbol references.
 ;; Tracking such information is a task that requires a huge amount of
-;; space and processing not apropriate for an Emacs Lisp program.
+;; space and processing not appropriate for an Emacs Lisp program.
 ;;
 ;; Many desired tools used in refactoring, however, need to have
 ;; such references available to them.  This API aims to provide a
@@ -58,7 +58,7 @@
 ;;
 ;; ADD A NEW EXTERNAL TOOL
 ;;
-;; To support a new external tool, sublcass `semantic-symref-tool-baseclass'
+;; To support a new external tool, subclass `semantic-symref-tool-baseclass'
 ;; and implement the methods.  The baseclass provides support for
 ;; managing external processes that produce parsable output.
 ;;
@@ -253,7 +253,7 @@ Returns an object of class `semantic-symref-result'."
 
 ;;;###autoload
 (defun semantic-symref-find-text (text &optional scope)
-  "Find a list of occurances of TEXT in the current project.
+  "Find a list of occurrences of TEXT in the current project.
 TEXT is a regexp formatted for use with egrep.
 Optional SCOPE specifies which file set to search.  Defaults to 'project.
 Refers to `semantic-symref-tool', to determine the reference tool to use
diff --git a/lisp/cedet/semantic/symref/filter.el b/lisp/cedet/semantic/symref/filter.el
index 97e5c92a6ab..2b12fd7253d 100644
--- a/lisp/cedet/semantic/symref/filter.el
+++ b/lisp/cedet/semantic/symref/filter.el
@@ -1,6 +1,6 @@
 ;;; semantic/symref/filter.el --- Filter symbol reference hits for accuracy.
 
-;;; Copyright (C) 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
 
@@ -60,10 +60,10 @@ Return non-nil for a match."
 ;; a symref results object.
 
 (defun semantic-symref-hits-in-region (target hookfcn start end)
-  "Find all occurances of the symbol TARGET that match TARGET the tag.
+  "Find all occurrences of the symbol TARGET that match TARGET the tag.
 For each match, call HOOKFCN.
 HOOKFCN takes three arguments that match
-`semantic-analyze-current-symbol's use of HOOKfCN.
+`semantic-analyze-current-symbol's use of HOOKFCN.
   ( START END PREFIX )
 
 Search occurs in the current buffer between START and END."
diff --git a/lisp/cedet/semantic/symref/grep.el b/lisp/cedet/semantic/symref/grep.el
index 3033a41faaf..bd9e731c722 100644
--- a/lisp/cedet/semantic/symref/grep.el
+++ b/lisp/cedet/semantic/symref/grep.el
@@ -1,6 +1,6 @@
 ;;; semantic/symref/grep.el --- Symref implementation using find/grep
 
-;;; Copyright (C) 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
 
@@ -103,9 +103,9 @@ Optional argument MODE specifies the `major-mode' to test."
 (defun semantic-symref-grep-use-template (rootdir filepattern grepflags greppattern)
   "Use the grep template expand feature to create a grep command.
 ROOTDIR is the root location to run the `find' from.
-FILEPATTERN is a string represeting find flags for searching file patterns.
+FILEPATTERN is a string representing find flags for searching file patterns.
 GREPFLAGS are flags passed to grep, such as -n or -l.
-GREPPATTERN is the pattren used by grep."
+GREPPATTERN is the pattern used by grep."
   ;; We have grep-compute-defaults.  Lets use it.
   (grep-compute-defaults)
   (let* ((grep-expand-keywords semantic-symref-grep-expand-keywords)
diff --git a/lisp/cedet/semantic/symref/list.el b/lisp/cedet/semantic/symref/list.el
index ad1d471d69e..7351c73adfc 100644
--- a/lisp/cedet/semantic/symref/list.el
+++ b/lisp/cedet/semantic/symref/list.el
@@ -23,11 +23,11 @@
 ;;
 ;; Provide a simple user facing API to finding symbol references.
 ;;
-;; This UI will is the base of some refactoring tools.  For any
-;; refactor, the user will execture `semantic-symref' in a tag.  Once
-;; that data is collected, the output will be listed in a buffer.  In
-;; the output buffer, the user can then initiate different refactoring
-;; operations.
+;; This UI is the base of some refactoring tools.  For any refactor,
+;; the user will execture [FIXME what?] `semantic-symref' in a tag.
+;; Once that data is collected, the output will be listed in a buffer.
+;; In the output buffer, the user can then initiate different
+;; refactoring operations.
 ;;
 ;; NOTE: Need to add some refactoring tools.
 
@@ -41,10 +41,10 @@
 (defun semantic-symref ()
   "Find references to the current tag.
 This command uses the currently configured references tool within the
-current project to find references to the current tag. The
+current project to find references to the current tag.  The
 references are the organized by file and the name of the function
 they are used in.
-Display the references in`semantic-symref-results-mode'"
+Display the references in`semantic-symref-results-mode'."
   (interactive)
   (semantic-fetch-tags)
   (let ((ct (semantic-current-tag))
@@ -67,7 +67,7 @@ This command uses the currently configured references tool within the
 current project to find references to the input SYM.  The
 references are the organized by file and the name of the function
 they are used in.
-Display the references in`semantic-symref-results-mode'"
+Display the references in`semantic-symref-results-mode'."
   (interactive (list (semantic-tag-name (semantic-complete-read-tag-buffer-deep
                                          "Symrefs for: "))))
   (semantic-fetch-tags)
@@ -141,7 +141,7 @@ RESULTS is an object of class `semantic-symref-results'."
   )
 
 (defun semantic-symref-hide-buffer ()
-  "Hide buffer with sematinc-symref results"
+  "Hide buffer with semantic-symref results."
   (interactive)
   (bury-buffer))
 
diff --git a/lisp/cedet/semantic/tag.el b/lisp/cedet/semantic/tag.el
index 608f4f403ee..1dfd3b8e872 100644
--- a/lisp/cedet/semantic/tag.el
+++ b/lisp/cedet/semantic/tag.el
@@ -1,7 +1,7 @@
 ;;; semantic/tag.el --- tag creation and access
 
-;;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007,
-;;; 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008,
+;;   2009  Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -39,7 +39,7 @@
 ;; II.  There is also an API for tag creation.  Use `semantic-tag' to create
 ;;     a new tag.
 ;;
-;; III.  Tag Comparison.  Allows explicit or comparitive tests to see
+;; III.  Tag Comparison.  Allows explicit or comparative tests to see
 ;;      if two tags are the same.
 
 ;;; Code:
@@ -111,7 +111,7 @@ A variable, or named storage for data.
 @item include
 Statement that represents a file from which more tags can be found.
 @item package
-Statement that declairs this file's package name.
+Statement that declares this file's package name.
 @item code
 Code that has not name or binding to any other symbol, such as in a script.
 @end table
@@ -528,8 +528,9 @@ ATTRIBUTES is a list of additional attributes belonging to this tag."
   "Create a semantic tag of class 'variable.
 NAME is the name of this variable.
 TYPE is a string or semantic tag representing the type of this variable.
-Optional DEFAULT-VALUE is a string representing the default value of this variable.
-ATTRIBUTES is a list of additional attributes belonging to this tag."
+Optional DEFAULT-VALUE is a string representing the default value of this
+variable.  ATTRIBUTES is a list of additional attributes belonging to this
+tag."
   (apply 'semantic-tag name 'variable
          :type type
          :default-value default-value
@@ -631,7 +632,7 @@ copied tag.
 If optional argument KEEP-FILE is non-nil, and TAG was linked to a
 buffer, the originating buffer file name is kept in the `:filename'
 property of the copied tag.
-If KEEP-FILE is a string, and the orginating buffer is NOT available,
+If KEEP-FILE is a string, and the originating buffer is NOT available,
 then KEEP-FILE is stored on the `:filename' property.
 This runs the tag hook `unlink-copy-hook`."
   ;; Right now, TAG is a list.
@@ -702,7 +703,7 @@ It is safe for FILTER to modify the input tag and return it."
 (defun semantic--tag-deep-copy-attributes (attrs &optional filter)
   "Make a deep copy of ATTRS, applying FILTER to each child-tag.
 
-It is safe to modify ATTR, and return a permutaion of that list.
+It is safe to modify ATTR, and return a permutation of that list.
 
 FILTER takes TAG as an argument, and should returns a semantic-tag.
 It is safe for FILTER to modify the input tag and return it."
@@ -715,7 +716,7 @@ It is safe for FILTER to modify the input tag and return it."
 (defun semantic--tag-deep-copy-value (value &optional filter)
   "Make a deep copy of VALUE, applying FILTER to each child-tag.
 
-It is safe to  modify VALUE, and return a permutaion of that list.
+It is safe to modify VALUE, and return a permutation of that list.
 
 FILTER takes TAG as an argument, and should returns a semantic-tag.
 It is safe for FILTER to modify the input tag and return it."
@@ -734,7 +735,7 @@ It is safe for FILTER to modify the input tag and return it."
 (defun semantic--tag-deep-copy-tag-list (tags &optional filter)
   "Make a deep copy of TAGS, applying FILTER to each child-tag.
 
-It is safe to modify the TAGS list, and return a permutaion of that list.
+It is safe to modify the TAGS list, and return a permutation of that list.
 
 FILTER takes TAG as an argument, and should returns a semantic-tag.
 It is safe for FILTER to modify the input tag and return it."
@@ -994,7 +995,7 @@ Ignoring this step will prevent several features from working correctly."
   "Return the list of top level components belonging to TAG.
 Children are any sub-tags which contain overlays.
 The default action collects regular components of TAG, in addition
-to any components beloning to an anonymous type."
+to any components belonging to an anonymous type."
   (let ((explicit-children (semantic-tag-components tag))
         (type (semantic-tag-type tag))
         (anon-type-children nil)
diff --git a/lisp/cedet/semantic/texi.el b/lisp/cedet/semantic/texi.el
index 5f00b1ab928..cdf416a5a30 100644
--- a/lisp/cedet/semantic/texi.el
+++ b/lisp/cedet/semantic/texi.el
@@ -1,7 +1,7 @@
 ;;; semantic/texi.el --- Semantic details for Texinfo files
 
-;;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <zappo@gnu.org>
 
@@ -252,7 +252,7 @@ The cursor should be on the @ sign."
               "menu\\|"
                (substring texinfo-environment-regexp
                          (match-beginning 0)))))
-  "Regular expression for matching texinfo enviroments.
+  "Regular expression for matching texinfo environments.
 uses `texinfo-environment-regexp', but makes sure that it
 can handle the @menu environment.")
 
diff --git a/lisp/cedet/semantic/util-modes.el b/lisp/cedet/semantic/util-modes.el
index 6b64287840e..8c7f54377d6 100644
--- a/lisp/cedet/semantic/util-modes.el
+++ b/lisp/cedet/semantic/util-modes.el
@@ -1,7 +1,7 @@
 ;;; semantic/util-modes.el --- Semantic minor modes
 
-;;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
-;;; Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2007, 2008, 2009
+;;   Free Software Foundation, Inc.
 
 ;; Authors: Eric M. Ludlam <zappo@gnu.org>
 ;;          David Ponce <david@dponce.com>
@@ -522,7 +522,7 @@ minor mode is enabled.
 (defcustom global-semantic-show-parser-state-mode nil
   "If non-nil enable global use of `semantic-show-parser-state-mode'.
 When enabled, the current parse state of the current buffer is displayed
-in the mode line. See `semantic-show-parser-state-marker' for details
+in the mode line.  See `semantic-show-parser-state-marker' for details
 on what is displayed."
   :group 'semantic
   :type 'boolean
@@ -634,7 +634,7 @@ minor mode is enabled."
 (defun semantic-show-parser-state-mode (&optional arg)
   "Minor mode for displaying parser cache state in the modeline.
 The cache can be in one of three states.  They are
-Up to date, Partial reprase needed, and Full reparse needed.
+Up to date, Partial reparse needed, and Full reparse needed.
 The state is indicated in the modeline with the following characters:
  `-'  ->  The cache is up to date.
  `!'  ->  The cache requires a full update.
diff --git a/lisp/cedet/semantic/wisent.el b/lisp/cedet/semantic/wisent.el
index 73a0a1e42bd..6d7ef753b39 100644
--- a/lisp/cedet/semantic/wisent.el
+++ b/lisp/cedet/semantic/wisent.el
@@ -52,7 +52,7 @@ When non-nil it is directly returned by `wisent-lex-function'.")
 
 (defmacro wisent-lex-eoi ()
   "Return an End-Of-Input lexical token.
-The EOI token is like this: ($EOI "" POINT-MAX . POINT-MAX)."
+The EOI token is like this: ($EOI \"\" POINT-MAX . POINT-MAX)."
   `(cons ',wisent-eoi-term
          (cons ""
                (cons (point-max) (point-max)))))