(format-annotate-atomic-property-change): Doc fix.

diff --git a/lisp/format.el b/lisp/format.el
index 96dd4f63ca1d23d94b8a17e3be560a8a242dbea4..c3c8c393b1306540ea332bf0bd802ed5f8f21b0d 100644 (file)
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -468,7 +468,7 @@ to write these unknown annotations back into the file."
                  (message "Extra closing annotation (%s) in file" name)
              ;; If one is open, but not on the top of the stack, close
              ;; the things in between as well.  Set `found' when the real
-             ;; oneis closed.
+             ;; one is closed.
                (while (not found)
                  (let* ((top (car open-ans)) ; first on stack: should match.
                         (top-name (car top))
@@ -759,7 +759,7 @@ Annotations to open and to close are returned as a dotted pair."
 
 (defun format-annotate-atomic-property-change (prop-alist old new)
   "Internal function annotate a single property change.
-PROP-ALIST is the relevant segement of a TRANSLATIONS list.
+PROP-ALIST is the relevant segment of a TRANSLATIONS list.
 OLD and NEW are the values."
   (cond
    ;; Numerical annotation - use difference