aboutsummaryrefslogtreecommitdiff
path: root/stack-question-list.el
diff options
context:
space:
mode:
Diffstat (limited to 'stack-question-list.el')
-rw-r--r--stack-question-list.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/stack-question-list.el b/stack-question-list.el
index c3f78bb..924e90e 100644
--- a/stack-question-list.el
+++ b/stack-question-list.el
@@ -174,6 +174,9 @@ Letters do not insert themselves; instead, they are commands.
(setq stack-question-list--total-count
(length tabulated-list-entries))))
+(defvar stack-question-list--current-site "emacs"
+ "Site being displayed in the *question-list* buffer.")
+
(defun stack-question-list-refresh (&optional redisplay no-update)
"Update the list of questions.
If REDISPLAY is non-nil, also call `tabulated-list-print'.
@@ -182,7 +185,8 @@ a new list before redisplaying."
(interactive "pP")
;; Reset the mode-line unread count (we rebuild it here).
(setq stack-question-list--unread-count 0)
- (let ((question-list (stack-core-make-request "questions")))
+ (let ((question-list (stack-question-get-questions
+ stack-question-list--current-site)))
;; Print the result.
(setq tabulated-list-entries
(mapcar #'stack-question-list--print-info question-list)))