diff options
| author | jao <jao@gnu.org> | 2021-01-11 20:57:56 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2021-01-11 20:57:56 +0000 |
| commit | 566935a0e14bf5538467fd8ec69788e558c96278 (patch) | |
| tree | c7ca75e7d39e8e44c7b258c032ae7ad6ef3994d2 /media | |
| parent | c9218804220c496d0c841eecaa0c8b6a92146880 (diff) | |
| download | elibs-566935a0e14bf5538467fd8ec69788e558c96278.tar.gz elibs-566935a0e14bf5538467fd8ec69788e558c96278.tar.bz2 | |
oops
Diffstat (limited to 'media')
| -rw-r--r-- | media/espotify.org | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/media/espotify.org b/media/espotify.org index 5cc0fee..686bad4 100644 --- a/media/espotify.org +++ b/media/espotify.org @@ -200,7 +200,7 @@ Let's start with an umbrella customization group: (defun espotify-search-all (callback term &optional types filter) (let ((types (or types '(album track artist playlist)))) (espotify-search* (lambda (&rest items) - (funcall callback (apply append items))) + (funcall callback (apply 'append items))) term types filter))) @@ -256,11 +256,14 @@ Let's start with an umbrella customization group: The top-level command will have this form: #+begin_src emacs-lisp + (defvar espotify-consult-history nil) + (defun consult-spotify-by (type &optional filter) (consult--read (format "Search %ss: " type) (espotify--search-generator type filter) :lookup 'espotify--consult-lookup - :category 'spotify-query-result + :category 'espotify-search-item + :history 'espotify-consult-history :initial "#" :require-match t)) #+end_src @@ -386,7 +389,7 @@ Let's start with an umbrella customization group: :face 'maginalia-modified :width 10)))) (add-to-list 'marginalia-annotators-heavy - (cons 'spotify-query-result 'espotify-marginalia-annotate)) + (cons 'espotify-search-item 'espotify-marginalia-annotate)) #+end_src * Post-amble :noexport: |