aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1996-01-04 23:37:04 +0000
committerKarl Heuer1996-01-04 23:37:04 +0000
commitfa1f61e5fe9c92c71e4d148d6113476240b62890 (patch)
treea8a84770d19edd69769cd89446885eb3d73797ee
parentd9f7b2d33c63213453ff3312e5bb9bb446476ca7 (diff)
downloademacs-fa1f61e5fe9c92c71e4d148d6113476240b62890.tar.gz
emacs-fa1f61e5fe9c92c71e4d148d6113476240b62890.zip
(format-annotate-atomic-property-change): Doc fix.
-rw-r--r--lisp/format.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/format.el b/lisp/format.el
index 96dd4f63ca1..c3c8c393b13 100644
--- a/lisp/format.el
+++ b/lisp/format.el
@@ -468,7 +468,7 @@ to write these unknown annotations back into the file."
468 (message "Extra closing annotation (%s) in file" name) 468 (message "Extra closing annotation (%s) in file" name)
469 ;; If one is open, but not on the top of the stack, close 469 ;; If one is open, but not on the top of the stack, close
470 ;; the things in between as well. Set `found' when the real 470 ;; the things in between as well. Set `found' when the real
471 ;; oneis closed. 471 ;; one is closed.
472 (while (not found) 472 (while (not found)
473 (let* ((top (car open-ans)) ; first on stack: should match. 473 (let* ((top (car open-ans)) ; first on stack: should match.
474 (top-name (car top)) 474 (top-name (car top))
@@ -759,7 +759,7 @@ Annotations to open and to close are returned as a dotted pair."
759 759
760(defun format-annotate-atomic-property-change (prop-alist old new) 760(defun format-annotate-atomic-property-change (prop-alist old new)
761 "Internal function annotate a single property change. 761 "Internal function annotate a single property change.
762PROP-ALIST is the relevant segement of a TRANSLATIONS list. 762PROP-ALIST is the relevant segment of a TRANSLATIONS list.
763OLD and NEW are the values." 763OLD and NEW are the values."
764 (cond 764 (cond
765 ;; Numerical annotation - use difference 765 ;; Numerical annotation - use difference