aboutsummaryrefslogtreecommitdiff
path: root/stack-core.el
diff options
context:
space:
mode:
authorSean Allred <code@seanallred.com>2014-11-05 19:25:19 -0500
committerSean Allred <code@seanallred.com>2014-11-05 19:25:19 -0500
commitd0e0b26fb00a7cda45078398d056de524afc6d2d (patch)
tree5e18af470775fd02fa7cff146a63c2137decf168 /stack-core.el
parent76887ae12de58c700d67ac7c57ad508a8e7f9564 (diff)
Implement OAuth2 authentication
Tested with commit 1749aa32c25d8eee9ca0753cb55bd7d134f320b7, current HEAD of the `gh-pages' branch.
Diffstat (limited to 'stack-core.el')
-rw-r--r--stack-core.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/stack-core.el b/stack-core.el
index c78c316..2e9b652 100644
--- a/stack-core.el
+++ b/stack-core.el
@@ -57,6 +57,10 @@
(format "http://api.stackexchange.com/%s/" stack-core-api-version)
"The base URL to make requests from.")
+(defconst stack-core-api-batch-request-separator
+ ";"
+ "The separator character to use when making batch requests.")
+
(defcustom stack-core-default-keyword-arguments-alist
'(("filters/create")
("sites")
@@ -110,7 +114,10 @@ a string, just return it."
(cond
((stringp thing) thing)
((symbolp thing) (symbol-name thing))
- ((numberp thing) (number-to-string thing))))
+ ((numberp thing) (number-to-string thing))
+ ((sequencep thing)
+ (mapconcat #'stack-core-thing-as-string
+ thing stack-core-api-batch-request-separator))))
(defun stack-core-get-default-keyword-arguments (method)
"Gets the correct keyword arguments for METHOD."