Mercurial > emacs
changeset 42545:190c648a9f3e
(enriched-make-annotation): Doc fix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 05 Jan 2002 09:05:35 +0000 |
| parents | 025e76c82b80 |
| children | a5795efa232a |
| files | lisp/enriched.el |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/enriched.el Sat Jan 05 00:46:01 2002 +0000 +++ b/lisp/enriched.el Sat Jan 05 09:05:35 2002 +0000 @@ -310,10 +310,11 @@ ;; Return new end. (point-max))) -(defun enriched-make-annotation (name positive) - "Format an annotation called NAME. -If POSITIVE is non-nil, this is the opening annotation, if nil, this is the -matching close." +(defun enriched-make-annotation (internal-ann positive) + "Format an annotation INTERNAL-ANN. +INTERNAL-ANN may be a string, for a flag, or a list of the form (PARAM VALUE). +If POSITIVE is non-nil, this is the opening annotation; +if nil, the matching close." (cond ((stringp name) (format enriched-annotation-format (if positive "" "/") name)) ;; Otherwise it is an annotation with parameters, represented as a list