From 51eef5a1b8bebaf699a92ac4af15c37cc76db1d2 Mon Sep 17 00:00:00 2001 From: Sean Allred Date: Fri, 31 Oct 2014 00:05:38 -0400 Subject: Change *-make-request to return the content only --- stack-core.el | 6 +----- stack-question.el | 11 +++++------ 2 files changed, 6 insertions(+), 11 deletions(-) diff --git a/stack-core.el b/stack-core.el index a915352..7b86de1 100644 --- a/stack-core.el +++ b/stack-core.el @@ -173,11 +173,7 @@ entire response as a complex alist." stack-core-remaining-api-requests-message-threshold) (stack-message "%d API requests remaining" stack-core-remaining-api-requests)) - response)) + (cdr (assoc 'items response)))) (provide 'stack-core) ;;; stack-core.el ends here - -;; Local Variables: -;; fill-column: 72 -;; End: diff --git a/stack-question.el b/stack-question.el index 13cc5e8..3902a39 100644 --- a/stack-question.el +++ b/stack-question.el @@ -33,12 +33,11 @@ (defun stack-question-get-questions (site &optional page) "Get the page PAGE of questions from SITE." - (cdr (assoc 'items - (stack-core-make-request - "questions" - `((site . ,site) - (page . ,page)) - stack-question-browse-filter)))) + (stack-core-make-request + "questions" + `((site . ,site) + (page . ,page)) + stack-question-browse-filter)) (provide 'stack-question) ;;; stack-question.el ends here -- cgit v1.2.3