aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-01-05 16:06:09 -0200
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-01-05 16:06:09 -0200
commit999822d231c92e52ea52f6a467980e6eb6b5e66f (patch)
treef9c21f123a25075b63133eeee22cd8db3ef4aa9b
parent85b4e56d60aaa3420616572c444d6152ed180944 (diff)
Add process-function arg to request-fallback. Fix #205
-rw-r--r--sx-request.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/sx-request.el b/sx-request.el
index ebc16d2..0d618d5 100644
--- a/sx-request.el
+++ b/sx-request.el
@@ -131,6 +131,8 @@ access the response wrapper."
(vconcat return-value
(cdr (assoc 'items response)))))
+;;; NOTE: Whenever this is arglist changes, `sx-request-fallback' must
+;;; also change.
(defun sx-request-make (method &optional args request-method process-function)
"Make a request to the API, executing METHOD with ARGS.
You should almost certainly be using `sx-method-call' instead of
@@ -204,7 +206,7 @@ the main content of the response is returned."
(funcall (or process-function #'sx-request-response-get-items)
response)))))))
-(defun sx-request-fallback (_method &optional _args _request-method)
+(defun sx-request-fallback (_method &optional _args _request-method _process-function)
"Fallback method when authentication is not available.
This is for UI generation when the associated API call would
require authentication.