[elpa] externals/org-transclusion 56dadcedb7 05/12: chg: Rename -add-callback to -add-payload

[ELPA Syncer]

branch: externals/org-transclusion
commit 56dadcedb78b5a0558445c81314df89469ea6934
Author: Joseph Turner <joseph@breatheoutbreathe.in>
Commit: Joseph Turner <joseph@breatheoutbreathe.in>

    chg: Rename -add-callback to -add-payload
    
    Technically, this function is not a callback function, although in
    both org-transclusion-http and hyperdrive-org-transclusion, it is
    called from within asynchronous callback functions.
---
 NEWS                |  2 +-
 org-transclusion.el | 19 +++++++++----------
 2 files changed, 10 insertions(+), 11 deletions(-)

diff --git a/NEWS b/NEWS
index de0c2e0822..cb19820b8a 100644
--- a/NEWS
+++ b/NEWS
@@ -12,7 +12,7 @@
     
https://git.sr.ht/~ushin/hyperdrive.el/tree/org-transclusion/item/hyperdrive-org-transclusion.el.
 
     - chg: #213 Allow making transclusion links from any protocol link
-    - refactor: #209 Split -add-callback from -add to enable async transclusion
+    - refactor: #209 Split -add-payload from -add to enable async transclusion
 
     add :things-at-point (or :thingatpt) property for transcluding
     source and other non-org text files. Both property names are synonym
diff --git a/org-transclusion.el b/org-transclusion.el
index 1fd402cdf3..8c85e59e8b 100644
--- a/org-transclusion.el
+++ b/org-transclusion.el
@@ -198,18 +198,17 @@ that consists of the following properties:
 - :src-end
 - :src-content
 
-Otherwise, the payload may be a named or lambda callback
-function.  In that case, the callback function will be called
-with the following arguments:
+Otherwise, the payload may be a named or lambda function which
+will be called with the following arguments:
 
 - \\+`link'
 - \\+`keyword-plist'
 - \\+`copy'
 
 In order for the transclusion to be inserted into the buffer, the
-callback function should generate a payload plist, then call
-`org-transclusion-add-callback', passing in the payload as well
-as the \\+`link', \\+`keyword-plist', and \\+`copy' arguments.")
+payload function should generate a payload plist, then call
+`org-transclusion-add-payload', passing in the payload as well as
+the \\+`link', \\+`keyword-plist', and \\+`copy' arguments.")
 
 (defvar org-transclusion-keyword-value-functions
   '(org-transclusion-keyword-value-link
@@ -446,9 +445,9 @@ does not support all the elements.
       (if (functionp payload)
           ;; Allow for asynchronous transclusion
           (funcall payload link keyword-plist copy)
-        (org-transclusion-add-callback payload link keyword-plist copy)))))
+        (org-transclusion-add-payload payload link keyword-plist copy)))))
 
-(defun org-transclusion-add-callback (payload link keyword-plist copy)
+(defun org-transclusion-add-payload (payload link keyword-plist copy)
   "Insert transcluded content with error handling.
 
 PAYLOAD should be a plist according to the description in
@@ -458,8 +457,8 @@ context object for the link.  KEYWORD-PLIST should contain 
the
 non-nil COPY, copy the transcluded content into the buffer.
 
 This function is intended to be called from within
-`org-transclusion-add' as well as callback functions returned by
-functions in `org-transclusion-add-functions'."
+`org-transclusion-add' as well as payload functions returned by
+hooks in `org-transclusion-add-functions'."
   (let ((tc-type (plist-get payload :tc-type))
         (src-buf (plist-get payload :src-buf))
         (src-beg (plist-get payload :src-beg))