[elpa] externals/org-transclusion d7b841f241 4/5: docs: Revert some docstrings and comments to main branch

[ELPA Syncer]

branch: externals/org-transclusion
commit d7b841f241d724f2e4de6d074f608dee1b0ba270
Author: Noboru Ota <me@nobiot.com>
Commit: Noboru Ota <me@nobiot.com>

    docs: Revert some docstrings and comments to main branch
---
 org-transclusion.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/org-transclusion.el b/org-transclusion.el
index 5f37222a69..97785b2c4d 100644
--- a/org-transclusion.el
+++ b/org-transclusion.el
@@ -942,7 +942,7 @@ inserted when more than one space is inserted between 
symbols."
 ;;-----------------------------------------------------------------------------
 ;;;; Add-at-point functions
 (defun org-transclusion-add-org-id (link plist)
-  "Return the payload list for Org-ID LINK object and PLIST.
+  "Return a list for Org-ID LINK object and PLIST.
 Return nil if not found."
   (when (string= "id" (org-element-property :type link))
     ;; when type is id, the value of path is the id
@@ -957,7 +957,7 @@ Return nil if not found."
         nil))))
 
 (defun org-transclusion-add-org-file (link plist)
-  "Return the payload list for Org file LINK object and PLIST.
+  "Return a list for Org file LINK object and PLIST.
 Return nil if not found."
   (and (string= "file" (org-element-property :type link))
        (org-transclusion-org-file-p (org-element-property :path link))
@@ -965,7 +965,7 @@ Return nil if not found."
                (org-transclusion-content-org-link link plist))))
 
 (defun org-transclusion-add-other-file (link plist)
-  "Return the payload list for non-Org file LINK object and PLIST.
+  "Return a list for non-Org file LINK object and PLIST.
 Return nil if not found."
   (and (string= "file" (org-element-property :type link))
        (append '(:tc-type "others-default")
@@ -1136,7 +1136,7 @@ work to
 
 (defun org-transclusion-content-org-link (link plist)
   "Return a list of payload from Org LINK object and PLIST.
-This function is intended to be used for Org-ID.  It delegates the
+This function is intended to be used for Org-ID. It delegates the
 work to
 `org-transclusion-content-org-filtered'."
   (save-excursion
@@ -1174,7 +1174,7 @@ work to
 (defun org-transclusion-content-org-filtered (only-element plist)
   "Return a list of payload for transclusion.
 This function assumes the point is at the beginning of the org
-element to transclude.-
+element to transclude.
 
 The payload is a plist that consists of the following properties:
 - :src-content
@@ -1194,7 +1194,7 @@ property controls the filter applied to the transclusion."
     (if (or (not el)(not type))
         (message "Nothing done")
       ;; For dedicated target, we want to get the parent paragraph,
-      ;; rather than the target itself-
+      ;; rather than the target itself
       (when (and (string= "target" type)
                  (string= "paragraph"
                           (org-element-type (org-element-property :parent 
el))))