diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-11 15:52:16 +0000 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-11 15:52:16 +0000 |
| commit | 2c2becfa47d0b13d633f85a7c18f4d40193dc454 (patch) | |
| tree | 698c387304126f88c6223b4b27d9eab42b8c28cc | |
| parent | c56c78f4a285a9c48a7917eda016efbf00553b5a (diff) | |
sx-search-get-questions make KEYWORDS a &rest argument.
| -rw-r--r-- | sx-search.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/sx-search.el b/sx-search.el index 7b4e6c0..55964b9 100644 --- a/sx-search.el +++ b/sx-search.el @@ -39,7 +39,9 @@ ;;; Basic function -(defun sx-search-get-questions (site page query &optional tags excluded-tags keywords) +(defun sx-search-get-questions (site page query + &optional tags excluded-tags + &rest keywords) "Like `sx-question-get-questions', but restrict results by a search. Perform search on SITE. PAGE is an integer indicating which page @@ -108,7 +110,7 @@ prefix argument, the user is asked for everything." (sx-search-get-questions sx-question-list--site page query tags excluded-tags - `((sort . ,sx-question-list--order))))) + (cons 'sort sx-question-list--order)))) (setq sx-question-list--site site) (setq sx-question-list--order sx-search-default-order) (setq sx-question-list--order-methods sx-search--order-methods) |