* files-x.el (modify-dir-local-variable)
authorJuanma Barranquero <lekktu@gmail.com>
Sun, 4 Oct 2009 01:44:39 +0000 (01:44 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Sun, 4 Oct 2009 01:44:39 +0000 (01:44 +0000)
  (copy-dir-locals-to-file-locals-prop-line):
* cedet/ede/makefile-edit.el (makefile-beginning-of-command)
  (makefile-end-of-command):
* cedet/semantic/lex.el (semantic-lex-token):
* cedet/semantic/analyze/fcn.el
  (semantic-analyze-dereference-metatype-1):
* cedet/semantic/bovine/c.el (semantic-lex-cpp-define)
  (semantic-lex-cpp-undef):
* cedet/semantic/wisent/wisent.el (wisent-skip-block):
* cedet/srecode/srt-mode.el (semantic-beginning-of-context)
  (semantic-end-of-context): Fix typos in docstrings.

lisp/ChangeLog
lisp/cedet/ede/makefile-edit.el
lisp/cedet/semantic/analyze/fcn.el
lisp/cedet/semantic/bovine/c.el
lisp/cedet/semantic/lex.el
lisp/cedet/semantic/wisent/wisent.el
lisp/cedet/srecode/srt-mode.el
lisp/files-x.el

index c048020..e9a8abb 100644 (file)
@@ -1,13 +1,26 @@
 2009-10-04  Juanma Barranquero  <lekktu@gmail.com>
 
+       * files-x.el (modify-dir-local-variable)
+       (copy-dir-locals-to-file-locals-prop-line):
+       * cedet/ede/makefile-edit.el (makefile-beginning-of-command)
+       (makefile-end-of-command):
+       * cedet/semantic/lex.el (semantic-lex-token):
+       * cedet/semantic/analyze/fcn.el
+       (semantic-analyze-dereference-metatype-1):
+       * cedet/semantic/bovine/c.el (semantic-lex-cpp-define)
+       (semantic-lex-cpp-undef):
+       * cedet/semantic/wisent/wisent.el (wisent-skip-block):
+       * cedet/srecode/srt-mode.el (semantic-beginning-of-context)
+       (semantic-end-of-context): Fix typos in docstrings.
+
        * recentf.el (recentf-unload-function): New function.
 
 2009-10-04  Chong Yidong  <cyd@stupidchicken.com>
 
+       * cedet/ede.el (ede-project-placeholder-cache-file):
        * cedet/semantic/db-file.el (semanticdb-default-save-directory):
        * cedet/srecode/map.el (srecode-map-save-file):
-       * cedet/ede.el (ede-project-placeholder-cache-file): Use
-       locate-user-emacs-file.  Suggested by Juanma Barranquero.
+       Use locate-user-emacs-file.  Suggested by Juanma Barranquero.
 
 2009-10-04  Glenn Morris  <rgm@gnu.org>
 
index c255966..542ea70 100644 (file)
@@ -42,7 +42,7 @@
 ;;; Code:
 
 (defun makefile-beginning-of-command ()
-  "Move the the beginning of the current command."
+  "Move the beginning of the current command."
   (interactive)
   (if (save-excursion
        (forward-line -1)
@@ -57,7 +57,7 @@
     (forward-line 1)))
 
 (defun makefile-end-of-command ()
-  "Move the the beginning of the current command."
+  "Move the beginning of the current command."
   (interactive)
   (end-of-line)
   (while (and (makefile-line-continued-p)
index d0d5fc7..83ffdb4 100644 (file)
@@ -288,7 +288,7 @@ Optional argument TYPE-DECLARATION is how TYPE was found referenced."
 
 (defun semantic-analyze-dereference-metatype-1 (ans scope)
   "Do extra work after dereferencing a metatype.
-ANS is the answer from the the language specific query.
+ANS is the answer from the language specific query.
 SCOPE is the current scope."
   (require 'semantic/scope)
   ;; If ANS is a string, or if ANS is a short tag, we
index 113f49a..8a77358 100644 (file)
@@ -228,7 +228,7 @@ if `semantic-c-member-of-autocast' is nil :
 (define-lex-spp-macro-declaration-analyzer semantic-lex-cpp-define
   "A #define of a symbol with some value.
 Record the symbol in the semantic preprocessor.
-Return the the defined symbol as a special spp lex token."
+Return the defined symbol as a special spp lex token."
   "^\\s-*#\\s-*define\\s-+\\(\\(\\sw\\|\\s_\\)+\\)" 1
   (goto-char (match-end 0))
   (skip-chars-forward " \t")
@@ -264,7 +264,7 @@ Return the the defined symbol as a special spp lex token."
 (define-lex-spp-macro-undeclaration-analyzer semantic-lex-cpp-undef
   "A #undef of a symbol.
 Remove the symbol from the semantic preprocessor.
-Return the the defined symbol as a special spp lex token."
+Return the defined symbol as a special spp lex token."
   "^\\s-*#\\s-*undef\\s-+\\(\\(\\sw\\|\\s_\\)+\\)" 1)
 
 \f
index 43a8a6d..03545ff 100644 (file)
@@ -897,8 +897,8 @@ 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 only if the the bounds
-in the buffer do not cover the string they represent.  (As from
+Optional STR is the string for the token only if 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
   ;; compile time, where STR is some symbol or constant.  If the
index febe1aa..0ca3e11 100644 (file)
@@ -268,9 +268,9 @@ Return nil.
 Must be used in error recovery semantic actions.
 Optional argument BOUNDS is a pair (START . END) which indicates where
 the parenthesized block starts.  Typically the value of a `$regionN'
-variable, where `N' is the the Nth element of the current rule
-components that match the block beginning.  It defaults to the value
-of the `$region' variable."
+variable, where `N' is the Nth element of the current rule components
+that match the block beginning.  It defaults to the value of the
+`$region' variable."
   (let ((start (car (or bounds $region)))
         end input)
     (if (not (number-or-marker-p start))
index e10c163..49d77a3 100644 (file)
@@ -320,7 +320,7 @@ how many occur."
            (beginning-of-line)
            (while (re-search-forward es start t 2))
            (if (re-search-forward es start t)
-               ;; If there is a single, the the answer is yes.
+               ;; If there is a single, the answer is yes.
                t
              ;; If there wasn't another, then the answer is no.
              nil)
@@ -375,7 +375,7 @@ Moves out one named section."
 (define-mode-local-override semantic-beginning-of-context
   srecode-template-mode (&optional point)
   "Move to the beginning of the current context.
-Moves the the beginning of one named section."
+Moves the beginning of one named section."
   (if (semantic-up-context point)
       t
     (let ((es (regexp-quote (srecode-template-get-escape-start)))
@@ -387,7 +387,7 @@ Moves the the beginning of one named section."
 (define-mode-local-override semantic-end-of-context
   srecode-template-mode (&optional point)
   "Move to the beginning of the current context.
-Moves the the beginning of one named section."
+Moves the beginning of one named section."
   (let ((name (srecode-up-context-get-name point))
        (tag (semantic-current-tag))
        (es  (regexp-quote (srecode-template-get-escape-start))))
index 72e8921..f7be79e 100644 (file)
@@ -354,7 +354,7 @@ If .dir-locals.el was not found and OP is not `delete' then create
 this file in the current directory.
 
 If OP is `delete' then delete all existing settings of VARIABLE
-from the the MODE alist ignoring the input argument VALUE."
+from the MODE alist ignoring the input argument VALUE."
   (catch 'exit
     (unless enable-local-variables
       (throw 'exit (message "Directory-local variables are disabled")))
@@ -450,7 +450,7 @@ from the the MODE alist ignoring the input argument VALUE."
 
 ;;;###autoload
 (defun copy-dir-locals-to-file-locals-prop-line ()
-  "Copy directory-local variables to the the -*- line."
+  "Copy directory-local variables to the -*- line."
   (interactive)
   (dolist (elt dir-local-variables-alist)
     (add-file-local-variable-prop-line (car elt) (cdr elt))))