diff options
| -rw-r--r-- | sx-search.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/sx-search.el b/sx-search.el index 55964b9..235d5f7 100644 --- a/sx-search.el +++ b/sx-search.el @@ -68,9 +68,14 @@ KEYWORDS is passed to `sx-method-call'." (default-value 'sx-question-list--order-methods))) "Alist of possible values to be passed to the `sort' keyword.") -(defvar sx-search-default-order 'activity +(defcustom sx-search-default-order 'activity "Default ordering method used on new searches. -Possible values are the cdrs of `sx-search--order-methods'.") +Possible values are the cdrs of `sx-search--order-methods'." + :type (cons 'choice + (mapcar (lambda (c) `(const :tag ,(car c) ,(cdr c))) + (cl-remove-duplicates + sx-search--order-methods + :key #'cdr)))) ;;;###autoload |