diff options
| author | Sean Allred <code@seanallred.com> | 2015-01-02 19:31:53 -0500 |
|---|---|---|
| committer | Sean Allred <code@seanallred.com> | 2015-01-02 19:31:53 -0500 |
| commit | 7a9fa9313a5af4bd5e227f2567b705ad7be0d203 (patch) | |
| tree | 78a8e35e9de4146bdf4002001806f09cd659f5c7 /sx-request.el | |
| parent | 48273879d34d6027d9edd623e9f946ef819d363e (diff) | |
| parent | b67f83fa66b39736a3281b484d84aef8eff890cd (diff) | |
Merge branch 'get-all' into tag-bot
Diffstat (limited to 'sx-request.el')
| -rw-r--r-- | sx-request.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/sx-request.el b/sx-request.el index 00b90be..da0a1fb 100644 --- a/sx-request.el +++ b/sx-request.el @@ -100,7 +100,7 @@ It is good to use a reasonable delay to avoid rate-limiting.") ;;; Making Requests (defun sx-request-all-items (method &optional args request-method - process-function stop-when) + stop-when) "Call METHOD with ARGS until there are no more items. STOP-WHEN is a function that takes the entire response and returns non-nil if the process should stop. @@ -115,7 +115,7 @@ access the response wrapper." (let* ((return-value []) (current-page 1) (stop-when (or stop-when #'sx-request-all-stop-when-no-more)) - (process-function (or process-function #'identity)) + (process-function #'identity) (response (sx-request-make method `((page . ,current-page) ,@args) request-method process-function))) |