From 60a07cd274e80d9dfbb37f4d87a51e7b1d8af536 Mon Sep 17 00:00:00 2001
From: Sean Allred <code@seanallred.com>
Date: Mon, 10 Nov 2014 23:10:23 -0500
Subject: Use narrow filter for site list

---
 sx-site.el | 20 ++++++++++++++++++--
 1 file changed, 18 insertions(+), 2 deletions(-)

diff --git a/sx-site.el b/sx-site.el
index 8d78e8a..3c326e4 100644
--- a/sx-site.el
+++ b/sx-site.el
@@ -23,10 +23,26 @@
 
 ;;; Code:
 
-(require 'sx-request)
+(require 'sx-method)
+
+(defvar sx-site-browse-filter
+  '((.backoff
+     .error_id
+     .error_message
+     .error_name
+     .has_more
+     .items
+     .quota_max
+     .quota_remaining
+     site.site_type
+     site.name
+     site.site_url
+     site.api_site_parameter)
+    nil
+    none))
 
 (defun sx-site-get-sites ()
-  (sx-request-make "sites"))
+  (sx-method-call "sites" nil sx-site-browse-filter))
 
 (provide 'sx-site)
 ;;; stack-site.el ends here
-- 
cgit v1.2.3