From 590b4c52574c7fcdeaf21b44ecea9cbb861ccfca Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Thu, 12 Feb 2015 10:30:45 -0200 Subject: Imrpove sx-question-list--order-methods --- sx-question-list.el | 5 ++--- sx-search.el | 3 +-- 2 files changed, 3 insertions(+), 5 deletions(-) diff --git a/sx-question-list.el b/sx-question-list.el index 77281d7..c66c04b 100644 --- a/sx-question-list.el +++ b/sx-question-list.el @@ -230,12 +230,11 @@ This is ignored if `sx-question-list--refresh-function' is set.") ": Quit") "Header-line used on the question list.") -(defconst sx-question-list--order-methods +(defvar sx-question-list--order-methods '(("Recent Activity" . activity) ("Creation Date" . creation) ("Most Voted" . votes) - ("Score" . votes) - ("Hot" . hot)) + ("Score" . votes)) "Alist of possible values to be passed to the `sort' keyword.") (make-variable-buffer-local 'sx-question-list--order-methods) diff --git a/sx-search.el b/sx-search.el index e6746a3..febeeef 100644 --- a/sx-search.el +++ b/sx-search.el @@ -64,8 +64,7 @@ KEYWORDS is passed to `sx-method-call'." (defconst sx-search--order-methods (cons '("Relevance" . relevance) - (cl-remove-if (lambda (x) (eq (cdr x) 'hot)) - (default-value 'sx-question-list--order-methods))) + (default-value 'sx-question-list--order-methods)) "Alist of possible values to be passed to the `sort' keyword.") (defcustom sx-search-default-order 'activity -- cgit v1.2.3