diff options
author | Sean Allred <code@seanallred.com> | 2015-01-04 15:28:57 -0500 |
---|---|---|
committer | Sean Allred <code@seanallred.com> | 2015-01-04 15:28:57 -0500 |
commit | 87d010c9974963a1f92f7136bec9df084e050e90 (patch) | |
tree | dc4b74ed834aadc5992e92419f5247eb0408a7a4 /sx-method.el | |
parent | d20f7e140d33b230cdaddd08cc6e2dfe75fd1e2b (diff) | |
parent | 1b5fd39d84cfc3138c2619631eebe508e7a0c2f9 (diff) |
Merge pull request #196 from vermiculus/vermiculus/url-post-get
Use symbols for url-request-method
Diffstat (limited to 'sx-method.el')
-rw-r--r-- | sx-method.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sx-method.el b/sx-method.el index e68a4ea..bff6d30 100644 --- a/sx-method.el +++ b/sx-method.el @@ -39,7 +39,7 @@ (pagesize 100) (filter '(())) auth - (url-method "GET") + (url-method 'get) get-all (process-function #'sx-request-response-get-items) @@ -53,7 +53,7 @@ user. :FILTER is the set of filters to control the returned information :AUTH defines how to act if the method or filters require authentication. -:URL-METHOD is either \"POST\" or \"GET\" +:URL-METHOD is either `post' or `get' :SITE is the api parameter specifying the site. :GET-ALL is nil or non-nil :PROCESS-FUNCTION is a response-processing function @@ -102,7 +102,7 @@ Return the entire response as a complex alist." (format "/%s" submethod)) ;; On GET methods site is buggy, so we ;; need to provide it as a url argument. - (when (and site (string= url-method "GET")) + (when (and site (eq url-method 'get)) (prog1 (format "?site=%s" site) (setq site nil))))) |