diff options
| -rw-r--r-- | sx-favorites.el | 6 | ||||
| -rw-r--r-- | sx-networks.el | 8 | ||||
| -rw-r--r-- | sx-question.el | 16 | ||||
| -rw-r--r-- | sx-site.el | 4 |
4 files changed, 17 insertions, 17 deletions
diff --git a/sx-favorites.el b/sx-favorites.el index c00d262..aaf2734 100644 --- a/sx-favorites.el +++ b/sx-favorites.el @@ -52,9 +52,9 @@ Added as hook to initialization." (defun sx-favorites--retrieve-favorites (site) "Obtain list of starred QUESTION_IDs for SITE." (sx-method-call 'me - :submethod (format "favorites?site=%s" site) - :filter sx-favorite-list-filter - :auth t)) + :submethod (format "favorites?site=%s" site) + :filter sx-favorite-list-filter + :auth t)) (defun sx-favorites--update-site-favorites (site) "Update list of starred QUESTION_IDs for SITE. diff --git a/sx-networks.el b/sx-networks.el index f5aa9f5..e4660af 100644 --- a/sx-networks.el +++ b/sx-networks.el @@ -64,10 +64,10 @@ Sets cache and then uses `sx-network--get-associated' to update the variables." (sx-cache-set 'network-user (sx-method-call 'me - :submethod 'associated - :keywords '((types . (main_site meta_site))) - :filter sx-network--user-filter - :auth t)) + :submethod 'associated + :keywords '((types . (main_site meta_site))) + :filter sx-network--user-filter + :auth t)) (sx-network--get-associated)) (defun sx-network--initialize () diff --git a/sx-question.el b/sx-question.el index c02cf62..c66d253 100644 --- a/sx-question.el +++ b/sx-question.el @@ -58,19 +58,19 @@ property. (mapcar (lambda (question) (cons (cons 'site site) question)) (sx-method-call 'questions - :keywords `((page . ,page)) - :site site - :auth t - :filter sx-question-browse-filter))) + :keywords `((page . ,page)) + :site site + :auth t + :filter sx-question-browse-filter))) (defun sx-question-get-question (site question-id) "Query SITE for a QUESTION-ID and return it. If QUESTION-ID doesn't exist on SITE, raise an error." (let ((res (sx-method-call 'questions - :id id - :site site - :auth t - :filter sx-question-browse-filter))) + :id id + :site site + :auth t + :filter sx-question-browse-filter))) (if (vectorp res) (elt res 0) (error "Couldn't find question %S in %S" @@ -49,8 +49,8 @@ (sx-cache-get 'site-list '(sx-method-call 'sites - :keywords '((pagesize . 999)) - :filter sx-site-browse-filter))) + :keywords '((pagesize . 999)) + :filter sx-site-browse-filter))) (defcustom sx-site-favorites nil |