* cedet/ede/makefile-edit.el (makefile-beginning-of-command)

  (makefile-end-of-command):
* cedet/srecode/srt-mode.el (semantic-beginning-of-context)
  (semantic-end-of-context): Fix previous change.  Doc fixes.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e9a8abb1f9ffa5f852720965d99daa2df92b87e4..97962595a99becc70addad31dcdc8b15f6e15d30 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2009-10-04  Juanma Barranquero  <lekktu@gmail.com>
+
+       * cedet/ede/makefile-edit.el (makefile-beginning-of-command)
+       (makefile-end-of-command):
+       * cedet/srecode/srt-mode.el (semantic-beginning-of-context)
+       (semantic-end-of-context): Fix previous change.  Doc fixes.
+
 2009-10-04  Juanma Barranquero  <lekktu@gmail.com>
 
        * files-x.el (modify-dir-local-variable)

diff --git a/lisp/cedet/ede/makefile-edit.el b/lisp/cedet/ede/makefile-edit.el
index 542ea703946bedb3f398f8b878b46e2577b14967..8541010ad2999546b4f4cbf4f7e2f3f2b51c15fd 100644 (file)
--- a/lisp/cedet/ede/makefile-edit.el
+++ b/lisp/cedet/ede/makefile-edit.el
@@ -42,7 +42,7 @@
 ;;; Code:
 
 (defun makefile-beginning-of-command ()
-  "Move the beginning of the current command."
+  "Move to 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 beginning of the current command."
+  "Move to the end of the current command."
   (interactive)
   (end-of-line)
   (while (and (makefile-line-continued-p)

diff --git a/lisp/cedet/srecode/srt-mode.el b/lisp/cedet/srecode/srt-mode.el
index 49d77a35ddda024df81ec2d3ea52479fb4de9f07..d7e4b7b3ff4237e0386d22e050881dd6c057d0ce 100644 (file)
--- a/lisp/cedet/srecode/srt-mode.el
+++ b/lisp/cedet/srecode/srt-mode.el
@@ -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 beginning of one named section."
+Moves to the beginning of one named section."
   (if (semantic-up-context point)
       t
     (let ((es (regexp-quote (srecode-template-get-escape-start)))
@@ -386,8 +386,8 @@ Moves 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 beginning of one named section."
+  "Move to the end of the current context.
+Moves to the end of one named section."
   (let ((name (srecode-up-context-get-name point))
        (tag (semantic-current-tag))
        (es  (regexp-quote (srecode-template-get-escape-start))))