[Emacs-diffs] emacs/lisp ChangeLog files-x.el cedet/ede/makef...

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      09/10/04 01:44:43

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

Log message:
        * 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.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16344&r2=1.16345
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/files-x.el?cvsroot=emacs&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/ede/makefile-edit.el?cvsroot=emacs&r1=1.6&r2=1.7
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/lex.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/analyze/fcn.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/bovine/c.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/wisent/wisent.el?cvsroot=emacs&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/srecode/srt-mode.el?cvsroot=emacs&r1=1.5&r2=1.6

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16344
retrieving revision 1.16345
diff -u -b -r1.16344 -r1.16345
--- ChangeLog   4 Oct 2009 01:12:13 -0000       1.16344
+++ ChangeLog   4 Oct 2009 01:44:39 -0000       1.16345
@@ -1,13 +1,26 @@
 2009-10-04  Juanma Barranquero  <address@hidden>
 
+       * 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  <address@hidden>
 
+       * 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  <address@hidden>
 

Index: files-x.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/files-x.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- files-x.el  14 Aug 2009 04:47:38 -0000      1.2
+++ files-x.el  4 Oct 2009 01:44:42 -0000       1.3
@@ -354,7 +354,7 @@
 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 @@
 
 ;;;###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))))

Index: cedet/ede/makefile-edit.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/ede/makefile-edit.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- cedet/ede/makefile-edit.el  2 Oct 2009 12:52:17 -0000       1.6
+++ cedet/ede/makefile-edit.el  4 Oct 2009 01:44:42 -0000       1.7
@@ -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: cedet/semantic/lex.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/semantic/lex.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- cedet/semantic/lex.el       2 Oct 2009 10:53:35 -0000       1.4
+++ cedet/semantic/lex.el       4 Oct 2009 01:44:42 -0000       1.5
@@ -897,8 +897,8 @@
   "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: cedet/semantic/analyze/fcn.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/semantic/analyze/fcn.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- cedet/semantic/analyze/fcn.el       2 Oct 2009 10:53:36 -0000       1.4
+++ cedet/semantic/analyze/fcn.el       4 Oct 2009 01:44:42 -0000       1.5
@@ -288,7 +288,7 @@
 
 (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: cedet/semantic/bovine/c.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/semantic/bovine/c.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- cedet/semantic/bovine/c.el  2 Oct 2009 10:53:36 -0000       1.4
+++ cedet/semantic/bovine/c.el  4 Oct 2009 01:44:42 -0000       1.5
@@ -228,7 +228,7 @@
 (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 @@
 (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)
 
 

Index: cedet/semantic/wisent/wisent.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/semantic/wisent/wisent.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- cedet/semantic/wisent/wisent.el     2 Oct 2009 10:53:36 -0000       1.3
+++ cedet/semantic/wisent/wisent.el     4 Oct 2009 01:44:42 -0000       1.4
@@ -268,9 +268,9 @@
 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: cedet/srecode/srt-mode.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/cedet/srecode/srt-mode.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- cedet/srecode/srt-mode.el   3 Oct 2009 19:28:09 -0000       1.5
+++ cedet/srecode/srt-mode.el   4 Oct 2009 01:44:43 -0000       1.6
@@ -320,7 +320,7 @@
            (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 @@
 (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 @@
 (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))))