branch: elpa/annotate
commit 146a7465084195905fcb45bfef04325694365de2
Author: cage <cage@invalid>
Commit: cage <cage@invalid>

    - fixed docstrings.
---
 annotate.el | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/annotate.el b/annotate.el
index baa5b35bd9..7e7136b697 100644
--- a/annotate.el
+++ b/annotate.el
@@ -669,7 +669,7 @@ Used when the mode is deactivated."
                                     (1 (annotate--change-guard)))))))
 
 (defun annotate-overlay-filled-p (overlay)
-  "Does this OVERLAY contains an \"annotation\" property?"
+  "Does this OVERLAY contains an `annotation' property?"
   (and overlay
        (overlayp overlay)
        (annotate-annotation-get-annotation-text overlay)))
@@ -1679,14 +1679,14 @@ file."
   (cl-first record))
 
 (defun annotate-beginning-of-annotation (annotation)
-  "Get the starting point of an annotation. The arg \"annotation\" must be a 
single
+  "Get the starting point of an annotation. The arg ANNOTATION must be a single
 annotation field got from a file dump of all annotated buffers,
 essentially what you get from:
 \(annotate-annotations-from-dump (nth index (annotate-load-annotations))))."
   (cl-first annotation))
 
 (defun annotate-ending-of-annotation (annotation)
-  "Get the ending point of an annotation. The arg \"annotation\" must be a 
single
+  "Get the ending point of an annotation. The arg ANNOTATION must be a single
 annotation field got from a file dump of all annotated buffers,
 essentially what you get from:
 \(annotate-annotations-from-dump (nth index (annotate-load-annotations))))."
@@ -1721,7 +1721,7 @@ the right side."
                            (1- (annotate-ending-of-annotation annotation))))
 
 (defun annotate-annotation-string (annotation)
-  "Get the text of an annotation. The arg \"annotation\" must be a single
+  "Get the text of an annotation. The arg ANNOTATION must be a single
 annotation field got from a file dump of all annotated buffers,
 essentially what you get from:
 \(annotate-annotations-from-dump (nth index (annotate-load-annotations))))."
@@ -2257,19 +2257,19 @@ must not be rendered."
   "Create a new annotation for selected region (from START to  END.
 
 Here the argument ANNOTATION-TEXT is the string that appears
-on the margin of the window and \"annotated-text\" is the string
+on the margin of the window and ANNOTATED-TEXT is the string
 that is underlined.
 
 If this function is called from procedure
-\"annotate-load-annotations\" the argument ANNOTATED-TEXT
+ANNOTATE-LOAD-ANNOTATIONS the argument ANNOTATED-TEXT
 should be not null.  In this case we know that an annotation
 existed in a text interval defined in the database
 metadata (the database located in the file specified by the
-variable \"annotate-file\") and should just be
+variable ANNOTATE-FILE) and should just be
 restored.  Sometimes the annotated text (see above) can not be
 found in said interval because the annotated file's content
-changed and `annotate-mode' could not track the
-changes (e.g. save the file when `annotate-mode' was not
+changed and `ANNOTATE-MODE' could not track the
+changes (e.g. save the file when `ANNOTATE-MODE' was not
 active/loaded) in this case the matching
 text (\"annotated-text\") is searched in a region surrounding the
 interval and, if found, the buffer is annotated right there.
@@ -2278,11 +2278,11 @@ The searched interval can be customized setting the 
variable:
 \"annotate-search-region-lines-delta\".
 
 COLOR-INDEX, if non-null (default nil), is used as index to address
-elements both in `annotate-color-index-from-dump'
-and `annotate-color-index-from-dump' to specify annotation appearance.
+elements both in ANNOTATE-COLOR-INDEX-FROM-DUMP
+and ANNOTATE-COLOR-INDEX-FROM-DUMP to specify annotation appearance.
 
 Finally POSITION indicates the positioning policy for the annotation,
-if null the value bound to `annotate-annotation-position-policy' is
+if null the value bound to ANNOTATE-ANNOTATION-POSITION-POLICY is
 used."
   (cl-labels ((face-annotation-shifting-point (position 
shifting-direction-function)
                 (when-let* ((annotation       (funcall 
shifting-direction-function

Reply via email to