from trunk

3 files changed, 10 insertions, 4 deletions

diff --git a/test/ChangeLog b/test/ChangeLog
index c5d2b7efeed..e52559399e5 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,9 @@
+2010-01-14  Juanma Barranquero  <lekktu@gmail.com>
+
+        * cedet/cedet-utests.el (cedet-utest-log-shutdown, pulse-test):
+        * cedet/semantic-ia-utest.el (semantic-ia-utest-error-log-list)
+        (semantic-ia-utest-buffer-refs): Fix typos in docstrings.
+
 2009-12-18  Ulf Jasper  <ulf.jasper@web.de>
 
         * icalendar-testsuite.el
diff --git a/test/cedet/cedet-utests.el b/test/cedet/cedet-utests.el
index 12f81488031..aab07d49472 100644
--- a/test/cedet/cedet-utests.el
+++ b/test/cedet/cedet-utests.el
@@ -236,7 +236,7 @@ Argument START and END bound the time being calculated."
 (defun cedet-utest-log-shutdown (title &optional errorcondition)
   "Shut-down a larger test suite.
 TITLE is the section that is done.
-ERRORCONDITION is some error that may have occured durinig testing."
+ERRORCONDITION is some error that may have occurred during testing."
   (let ((endtime (current-time))
         )
     (cedet-utest-log-shutdown-msg title cedet-utest-log-timer endtime)
@@ -466,7 +466,7 @@ converted into.")
 
 (defun pulse-test (&optional no-error)
   "Test the lightening function for pulsing a line.
-When optional NO-ERROR Don't throw an error if we can't run tests."
+When optional NO-ERROR don't throw an error if we can't run tests."
   (interactive)
   (if (or (not pulse-flag) (not (pulse-available-p)))
       (if no-error
diff --git a/test/cedet/semantic-ia-utest.el b/test/cedet/semantic-ia-utest.el
index 99477402de6..8e2aa43bd27 100644
--- a/test/cedet/semantic-ia-utest.el
+++ b/test/cedet/semantic-ia-utest.el
@@ -54,7 +54,7 @@
   "List of files with analyzer completion test points.")
 
 (defvar semantic-ia-utest-error-log-list nil
-  "List of errors occuring during a run.")
+  "List of errors occurring during a run.")
 
 ;;;###autoload
 (defun semantic-ia-utest (&optional arg)
@@ -211,7 +211,7 @@ Argument ARG specifies which set of tests to run.
     ))
 
 (defun semantic-ia-utest-buffer-refs ()
-  "Run a analyze-refs unit-test pass in the current buffer."
+  "Run an analyze-refs unit-test pass in the current buffer."
 
   (let* ((idx 1)
          (regex-p nil)