From e1a57f49379fa9345b662a721941edd7371db60b Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Sun, 4 Jan 2015 16:20:00 -0200
Subject: Implement listing starred questions.

Fix #14
---
 sx-switchto.el |  1 +
 sx-tab.el      | 18 ++++++++++++++++++
 2 files changed, 19 insertions(+)

diff --git a/sx-switchto.el b/sx-switchto.el
index 1a2c3a0..76804e4 100644
--- a/sx-switchto.el
+++ b/sx-switchto.el
@@ -47,6 +47,7 @@
     ("U" sx-tab-unanswered-my-tags)
     ("v" sx-tab-topvoted)
     ("w" sx-tab-week)
+    ("*" sx-tab-starred)
     ))
 
 
diff --git a/sx-tab.el b/sx-tab.el
index 6a2552f..f97119a 100644
--- a/sx-tab.el
+++ b/sx-tab.el
@@ -231,6 +231,24 @@ If SITE is nil, use `sx-default-site'."
      (file-name-directory load-file-name)))
   nil t)
 
+
+;;; Starred
+(sx-tab--define "Starred"
+  (lambda (page)
+    (sx-method-call 'me
+      :page page
+      :site sx-question-list--site
+      :auth t
+      :submethod 'favorites
+      :filter sx-browse-filter)))
+;;;###autoload
+(autoload 'sx-tab-featured
+  (expand-file-name
+   "sx-tab"
+   (when load-file-name
+     (file-name-directory load-file-name)))
+  nil t)
+
 
 ;;; Inter-modes navigation
 (defun sx-tab-meta-or-main ()
-- 
cgit v1.2.3