summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2013-08-27 12:02:42 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2013-08-27 12:02:42 -0700
commitb73517d9ecf5efeea0d6cbde56730132f5e1b611 (patch)
tree31493a02b35cc996481d14e91c12839acbb6c441
parent43aac990c339c0fc3304aa476ebc8ea8467f107e (diff)
downloademacs-b73517d9ecf5efeea0d6cbde56730132f5e1b611.tar.gz
Spelling fixes.
-rw-r--r--lisp/ChangeLog.122
-rw-r--r--test/automated/eieio-test-methodinvoke.el4
-rw-r--r--test/automated/eieio-tests.el16
3 files changed, 11 insertions, 11 deletions
diff --git a/lisp/ChangeLog.12 b/lisp/ChangeLog.12
index 6b34ef55783..7fcc4ff0caf 100644
--- a/lisp/ChangeLog.12
+++ b/lisp/ChangeLog.12
@@ -17355,7 +17355,7 @@
* calc/calc-embed.el (calc-do-embedded): Update help message.
- * calc/calc-prog.el (calc-user-define-invokation): Update help message.
+ * calc/calc-prog.el (calc-user-define-invocation): Update help message.
2005-11-28 Stefan Monnier <monnier@iro.umontreal.ca>
diff --git a/test/automated/eieio-test-methodinvoke.el b/test/automated/eieio-test-methodinvoke.el
index 76a28919f21..db8618c811e 100644
--- a/test/automated/eieio-test-methodinvoke.el
+++ b/test/automated/eieio-test-methodinvoke.el
@@ -1,4 +1,4 @@
-;;; eieio-testsinvoke.el -- eieio tests for method invokation
+;;; eieio-testsinvoke.el -- eieio tests for method invocation
;; Copyright (C) 2005, 2008, 2010, 2013 Free Software Foundation, Inc.
@@ -136,7 +136,7 @@
(setq eieio-test-method-order-list (nreverse eieio-test-method-order-list))
(eieio-test-match ans)))
-;;; Test static invokation
+;;; Test static invocation
;;
(defmethod eitest-H :STATIC ((class eitest-A))
"No need to do work in here."
diff --git a/test/automated/eieio-tests.el b/test/automated/eieio-tests.el
index 2d8ae4c7d43..144f0bc919d 100644
--- a/test/automated/eieio-tests.el
+++ b/test/automated/eieio-tests.el
@@ -21,7 +21,7 @@
;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
-;;
+;;
;; Test the various features of EIEIO.
(require 'ert)
@@ -66,7 +66,7 @@
:initform moose
:type symbol
:allocation :instance
- :documentation "Fisrt slot testing slot arguments."
+ :documentation "First slot testing slot arguments."
:custom symbol
:label "Wild Animal"
:group borg
@@ -166,7 +166,7 @@
(defun anormalfunction () "A plain function for error testing." nil)
(should-error
(progn
- (defgeneric anormalfunction ()
+ (defgeneric anormalfunction ()
"Attempt to turn it into a generic.")))
;; Check that generic-p works
@@ -589,7 +589,7 @@ METHOD is the method that was attempting to be called."
;;; HACK ALERT: The new value of a class slot is inherited by the
;; subclass! This is probably a bug. We should either share the slot
;; so sets on the baseclass change the subclass, or we should inherit
- ;; the original value.
+ ;; the original value.
;; (should (eq (get-slot-3 eitest-t2) 'emu))
;; (should (eq (get-slot-3 class-subc) 'emu))
;; (setf (get-slot-3 eitest-t2) 'setf-emu)
@@ -604,7 +604,7 @@ METHOD is the method that was attempting to be called."
"Try to access slot-2 from this class which doesn't have it.
The object S2 passed in will be of class prot-1, which does have
the slot. This could be allowed, and currently is in EIEIO.
-Needed by the eieio persistant base class."
+Needed by the eieio persistent base class."
(oref s2 slot-2))
(defclass prot-1 (prot-0)
@@ -662,7 +662,7 @@ Do not override for `prot-2'."
(prot0-slot-2 eitest-p1)
;; Accessing private slot out of context must fail
(should-error (oref eitest-p1 slot-3) :type 'invalid-slot-name)
- ;; Access private slot in ethod
+ ;; Access private slot in method
(prot1-slot-3 eitest-p1)
;; Access private slot in subclass method must fail
(should-error (prot1-slot-3 eitest-p2) :type 'invalid-slot-name)
@@ -713,7 +713,7 @@ Do not override for `prot-2'."
Subclasses to override slot attributes.")
(defclass slotattr-ok (slotattr-base)
- ((initform :initform no-init)
+ ((initform :initform no-init)
(initarg :initarg :initblarg)
(custom :custom string
:label "One String"
@@ -767,7 +767,7 @@ Subclasses to override slot attributes.")
Subclasses to override slot attributes.")
(defclass slotattr-class-ok (slotattr-class-base)
- ((initform :initform no-init)
+ ((initform :initform no-init)
(initarg :initarg :initblarg)
(custom :custom string
:label "One String"