diff options
author | Richard M. Stallman <[email protected]> | 2002-01-05 09:05:35 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 2002-01-05 09:05:35 +0000 |
commit | b8a8267bcbba3bb1909315031f763309245ba309 (patch) | |
tree | b7c5415a3a5c06be3afc8c25f976af4d4f84843b | |
parent | 30c6d055a96a4b7049d8a7d36ef3fa92907804dd (diff) |
(enriched-make-annotation): Doc fix.
-rw-r--r-- | lisp/enriched.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/enriched.el b/lisp/enriched.el index dec6c66e48..d3bd7084d1 100644 --- a/lisp/enriched.el +++ b/lisp/enriched.el @@ -310,10 +310,11 @@ the region, and the START and END of each region." ;; 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 |